Diff for /loncom/lond between versions 1.305.2.5 and 1.305.2.6

version 1.305.2.5, 2006/03/27 19:52:16 version 1.305.2.6, 2006/05/18 19:58:36
Line 2291  sub token_auth_user_file_handler { Line 2291  sub token_auth_user_file_handler {
     if (open(ENVIN,$perlvar{'lonIDsDir'}.'/'.      if (open(ENVIN,$perlvar{'lonIDsDir'}.'/'.
      $session.'.id')) {       $session.'.id')) {
  while (my $line=<ENVIN>) {   while (my $line=<ENVIN>) {
     if ($line=~ m|userfile\.\Q$fname\E\=|) { $reply="ok\n"; }      my ($envname)=split(/=/,$line,2);
       $envname=&unescape($envname);
       if ($envname=~ m|^userfile\.\Q$fname\E|) { $reply="ok\n"; }
  }   }
  close(ENVIN);   close(ENVIN);
  &Reply($client, $reply, "$cmd:$tail");   &Reply($client, $reply, "$cmd:$tail");

Removed from v.1.305.2.5  
changed lines
  Added in v.1.305.2.6


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