Diff for /loncom/lond between versions 1.399 and 1.400

version 1.399, 2008/04/16 22:51:21 version 1.400, 2008/04/21 15:27:34
Line 1535  sub ls3_handler { Line 1535  sub ls3_handler {
             &Failure($client,"refused\n","$cmd:$tail");              &Failure($client,"refused\n","$cmd:$tail");
             return 1;              return 1;
         }          }
     } elsif (defined($alternate_root)) {      } elsif ($alternate_root ne '') {
         $dir_root = $alternate_root;          $dir_root = $alternate_root;
     }      }
     if (defined($dir_root)) {      if ($dir_root ne '') {
         $ulsdir = $dir_root.'/'.$ulsdir;          if ($ulsdir =~ /^\//) {
               $ulsdir = $dir_root.$ulsdir;
           } else {
               $ulsdir = $dir_root.'/'.$ulsdir;
           }
     }      }
     my $obs;      my $obs;
     my $rights;      my $rights;
Line 1576  sub ls3_handler { Line 1580  sub ls3_handler {
         }          }
     } else {      } else {
         $ulsout='no_such_dir';          $ulsout='no_such_dir';
    }      }
    if ($ulsout eq '') { $ulsout='empty'; }      if ($ulsout eq '') { $ulsout='empty'; }
    &Reply($client, \$ulsout, $userinput); # This supports debug logging.      &Reply($client, \$ulsout, $userinput); # This supports debug logging.
    return 1;      return 1;
 }  }
 &register_handler("ls3", \&ls3_handler, 0, 1, 0);  &register_handler("ls3", \&ls3_handler, 0, 1, 0);
   

Removed from v.1.399  
changed lines
  Added in v.1.400


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>