Return to lonacc.pm CVS log | Up to [LON-CAPA] / loncom / auth |
version 1.17, 2001/05/28 22:29:17 | version 1.18, 2001/05/28 22:47:18 |
---|---|
Line 42 sub handler { | Line 42 sub handler { |
$ENV{$envname} = $envvalue; | $ENV{$envname} = $envvalue; |
} | } |
$ENV{'user.environment'} = "$lonidsdir/$handle.id"; | $ENV{'user.environment'} = "$lonidsdir/$handle.id"; |
if ($requrl=~/^\/res\/) { | if ($requrl=~/^\/res\//) { |
$ENV{'request.state'} = "published"; | $ENV{'request.state'} = "published"; |
} else { | } else { |
$ENV{'request.state'} = 'unknown'; | $ENV{'request.state'} = 'unknown'; |