[LON-CAPA-cvs] cvs: loncom /interface lonsource.pm
taceyjo1
lon-capa-cvs@mail.lon-capa.org
Thu, 08 Jul 2004 20:17:59 -0000
taceyjo1 Thu Jul 8 16:17:59 2004 EDT
Modified files:
/loncom/interface lonsource.pm
Log:
Cuddled else's AND elsif's
Index: loncom/interface/lonsource.pm
diff -u loncom/interface/lonsource.pm:1.7 loncom/interface/lonsource.pm:1.8
--- loncom/interface/lonsource.pm:1.7 Thu Jul 8 10:16:06 2004
+++ loncom/interface/lonsource.pm Thu Jul 8 16:17:59 2004
@@ -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 @@
$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');