lilalo

diff l3-cgi @ 113:8287cb3530de

sever files added
author igor
date Sun Mar 09 02:34:52 2008 +0200 (2008-03-09)
parents 2c00c61f2d7b
children 9e6359b7ad55
line diff
     1.1 --- a/l3-cgi	Wed Jun 14 21:37:22 2006 +0300
     1.2 +++ b/l3-cgi	Sun Mar 09 02:34:52 2008 +0200
     1.3 @@ -117,7 +117,9 @@
     1.4  else {
     1.5      # Вызов производится по URL
     1.6      $ENV{PATH_INFO} = "/".$ENV{PATH_INFO} unless $ENV{PATH_INFO} =~ m@^/@;
     1.7 +    #my ($skip, $training, $host, $user) = split /\//,$ENV{PATH_INFO},4;
     1.8      my ($skip, $training, $host, $user) = split /\//,$ENV{PATH_INFO},4;
     1.9 +    
    1.10  
    1.11      if (!$host || $host eq "index") {
    1.12          # Нам неизвестен курс или явно указан просмотр индекса