[LON-CAPA-cvs] cvs: loncom /publisher lonupload.pm

raeburn raeburn@source.lon-capa.org
Sun, 26 Dec 2010 03:09:11 -0000


raeburn		Sun Dec 26 03:09:11 2010 EDT

  Modified files:              
    /loncom/publisher	lonupload.pm 
  Log:
  - lonupload::phasethree() now returns an array.
  
  
Index: loncom/publisher/lonupload.pm
diff -u loncom/publisher/lonupload.pm:1.52 loncom/publisher/lonupload.pm:1.53
--- loncom/publisher/lonupload.pm:1.52	Tue Dec 14 16:26:04 2010
+++ loncom/publisher/lonupload.pm	Sun Dec 26 03:09:11 2010
@@ -2,7 +2,7 @@
 # The LearningOnline Network with CAPA
 # Handler to upload files into construction space
 #
-# $Id: lonupload.pm,v 1.52 2010/12/14 16:26:04 www Exp $
+# $Id: lonupload.pm,v 1.53 2010/12/26 03:09:11 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -547,7 +547,7 @@
         my $output = &phasefour($r,$fn,$uname,$udom,'author');
         $r->print($output);
     } elsif ($env{'form.phase'} eq 'three') {
-        my $output = &phasethree($r,$fn,$uname,$udom,'author');
+        my ($output,$rtnflag) = &phasethree($r,$fn,$uname,$udom,'author');
         $r->print($output);
     } elsif ($env{'form.phase'} eq 'two') {
 	my ($output,$returnflag) = &phasetwo($r,$fn,$uname,$udom);