version 1.14, 2004/05/08 02:07:16
|
version 1.15, 2004/05/09 00:45:01
|
Line 194 sub handler {
|
Line 194 sub handler {
|
my %cenv=&Apache::lonnet::coursedescription($ENV{'form.cid'}); |
my %cenv=&Apache::lonnet::coursedescription($ENV{'form.cid'}); |
my $keytype=''; |
my $keytype=''; |
if ($cenv{'url'} eq '/res/') { |
if ($cenv{'url'} eq '/res/') { |
($cenv{'num'},$cenv{'domain'})=split(/\_/,$ENV{'form.cid'}); |
($cenv{'domain'},$cenv{'num'})=split(/\_/,$ENV{'form.cid'}); |
$keytype='auth'; |
$keytype='auth'; |
} elsif ($cenv{'keyauth'}) { |
} elsif ($cenv{'keyauth'}) { |
($cenv{'num'},$cenv{'domain'})=split(/\W/,$cenv{'keyauth'}); |
($cenv{'num'},$cenv{'domain'})=split(/\W/,$cenv{'keyauth'}); |