lilalo

diff l3-cgi @ 112:da65f1cbaf3a
l3prompt added
author: igor
date: Sat Mar 08 22:36:44 2008 +0200 (2008-03-08)
parents: 2c00c61f2d7b
children: 9e6359b7ad55
     1.1 --- a/l3-cgi	Wed Jun 14 21:37:22 2006 +0300
     1.2 +++ b/l3-cgi	Sat Mar 08 22:36:44 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          # Нам неизвестен курс или явно указан просмотр индекса