--- loncom/interface/lonsource.pm	2004/07/07 20:01:02	1.6
+++ loncom/interface/lonsource.pm	2004/07/08 14:16:06	1.7
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Souce Code handler
 #
-# $Id: lonsource.pm,v 1.6 2004/07/07 20:01:02 taceyjo1 Exp $
+# $Id: lonsource.pm,v 1.7 2004/07/08 14:16:06 taceyjo1 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -212,18 +212,22 @@ sub handler {
     if ($source ne 'open') {
         $ENV{'user.error.msg'}="$filename:cre:1:1:Source code not available";
         return HTTP_NOT_ACCEPTABLE;
-    } if ((!&Apache::lonnet::allowed('cre',$filename)) ||
+    } 
+    if ((!&Apache::lonnet::allowed('cre',$filename)) ||
             (!&Apache::lonnet::allowed('bre',$filename))) {
         $ENV{'user.error.msg'}="$filename:bre:1:1:Access to resource denied";
         return HTTP_NOT_ACCEPTABLE;
-    } if ($ENV{'form.action'} eq 'stage2') {
+    } 
+    if ($ENV{'form.action'} eq 'stage2') {
         my $author = &Apache::lonnet::metadata($filename,'authorspace');
         $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') {
         &copy_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');