version 1.6, 2004/07/07 20:01:02
|
version 1.7, 2004/07/08 14:16:06
|
Line 212 sub handler {
|
Line 212 sub handler {
|
if ($source ne 'open') { |
if ($source ne 'open') { |
$ENV{'user.error.msg'}="$filename:cre:1:1:Source code not available"; |
$ENV{'user.error.msg'}="$filename:cre:1:1:Source code not available"; |
return HTTP_NOT_ACCEPTABLE; |
return HTTP_NOT_ACCEPTABLE; |
} if ((!&Apache::lonnet::allowed('cre',$filename)) || |
} |
|
if ((!&Apache::lonnet::allowed('cre',$filename)) || |
(!&Apache::lonnet::allowed('bre',$filename))) { |
(!&Apache::lonnet::allowed('bre',$filename))) { |
$ENV{'user.error.msg'}="$filename:bre:1:1:Access to resource denied"; |
$ENV{'user.error.msg'}="$filename:bre:1:1:Access to resource denied"; |
return HTTP_NOT_ACCEPTABLE; |
return HTTP_NOT_ACCEPTABLE; |
} if ($ENV{'form.action'} eq 'stage2') { |
} |
|
if ($ENV{'form.action'} eq 'stage2') { |
my $author = &Apache::lonnet::metadata($filename,'authorspace'); |
my $author = &Apache::lonnet::metadata($filename,'authorspace'); |
$author =~ m|@|; |
$author =~ m|@|; |
$author = $`; #This just tells who the author name is for later processing. |
$author = $`; #This just tells who the author name is for later processing. |
&stage_2($r, $ENV{'form.filename'}, $author, $listname); |
&stage_2($r, $ENV{'form.filename'}, $author, $listname); |
} elsif($ENV{'form.action'} eq 'copy_stage') { |
} |
|
elsif($ENV{'form.action'} eq 'copy_stage') { |
©_stage($r, $filename,$ENV{'form.listname'},$ENV{'form.newpath'}); |
©_stage($r, $filename,$ENV{'form.listname'},$ENV{'form.newpath'}); |
} elsif($ENV{'form.action'} eq 'delete_confirm') { |
} |
|
elsif($ENV{'form.action'} eq 'delete_confirm') { |
&Apache::loncommon::content_type($r,'text/html'); |
&Apache::loncommon::content_type($r,'text/html'); |
$r->send_http_header; |
$r->send_http_header; |
&delete_copy_file($r, $ENV{'form.author'}, $ENV{'form.newpath'}, $ENV{'form.filename'}, $ENV{'form.path'}, '0'); |
&delete_copy_file($r, $ENV{'form.author'}, $ENV{'form.newpath'}, $ENV{'form.filename'}, $ENV{'form.path'}, '0'); |