--- loncom/interface/lonsource.pm 2004/07/08 14:16:06 1.7 +++ loncom/interface/lonsource.pm 2004/07/08 20:17:59 1.8 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Souce Code handler # -# $Id: lonsource.pm,v 1.7 2004/07/08 14:16:06 taceyjo1 Exp $ +# $Id: lonsource.pm,v 1.8 2004/07/08 20:17:59 taceyjo1 Exp $ # # Copyright Michigan State University Board of Trustees # @@ -223,11 +223,9 @@ sub handler { $author =~ m|@|; $author = $`; #This just tells who the author name is for later processing. &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'}); - } - elsif($ENV{'form.action'} eq 'delete_confirm') { + } elsif($ENV{'form.action'} eq 'delete_confirm') { &Apache::loncommon::content_type($r,'text/html'); $r->send_http_header; &delete_copy_file($r, $ENV{'form.author'}, $ENV{'form.newpath'}, $ENV{'form.filename'}, $ENV{'form.path'}, '0');