|
version 1.32, 2000/12/13 21:46:37
|
version 1.33, 2000/12/13 22:45:56
|
|
Line 534 sub make_new_child {
|
Line 534 sub make_new_child {
|
| } |
} |
| unless ($fperror) { |
unless ($fperror) { |
| if ($umode eq 'none') { |
if ($umode eq 'none') { |
| } elsif ($umode eq 'kerberos') { |
} elsif ($umode eq 'krb4') { |
| { |
{ |
| my $pf = IO::File->new(">$passfilename"); |
my $pf = IO::File->new(">$passfilename"); |
| print $pf "kerberos:$npass\n"; |
print $pf "krb4:$npass\n"; |
| } |
} |
| print $client "ok\n"; |
print $client "ok\n"; |
| } elsif ($umode eq 'internal') { |
} elsif ($umode eq 'internal') { |
![[BACK]](/icons/back.gif){kind=icon}
Return to lond CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom