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

albertel lon-capa-cvs@mail.lon-capa.org
Sat, 08 Nov 2003 10:58:30 -0000


albertel		Sat Nov  8 05:58:30 2003 EDT

  Modified files:              
    /loncom/publisher	lonupload.pm 
  Log:
  - BUG#1904
  - typo in locaization code
  
  
Index: loncom/publisher/lonupload.pm
diff -u loncom/publisher/lonupload.pm:1.20 loncom/publisher/lonupload.pm:1.21
--- loncom/publisher/lonupload.pm:1.20	Mon Sep 22 11:39:53 2003
+++ loncom/publisher/lonupload.pm	Sat Nov  8 05:58:30 2003
@@ -2,7 +2,7 @@
 # The LearningOnline Network with CAPA
 # Handler to upload files into construction space
 #
-# $Id: lonupload.pm,v 1.20 2003/09/22 15:39:53 www Exp $
+# $Id: lonupload.pm,v 1.21 2003/11/08 10:58:30 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -99,7 +99,7 @@
  '<input type=hidden name=phase value=two>'.
  '<input type=hidden name=datatoken value="'.&upfile_store.'">'.
  '<input type=hidden name=uploaduname value="'.$uname.'">'.
- &mt('Store uploaded file as ').
+ &mt('Store uploaded file as ')."<tt>/priv/$uname/</tt>".
  '<input type=text size=50 name=filename value="'.$fn.'"><br>'.
  '<input type=submit value="'.&mt('Store').'"></form>');
       # Check for bad extension and warn user
@@ -258,11 +258,9 @@
   $r->print(&Apache::loncommon::bodytag('Upload file to Construction Space'));
   
   if (($uname ne $ENV{'user.name'}) || ($udom ne $ENV{'user.domain'})) {
-          $r->print('<h3><font color=red>'&mt('Co-Author').': '.$uname.
-&mt(' at ').$udom.
-               '</font></h3>');
+      $r->print('<h3><font color=red>'.&mt('Co-Author').': '.$uname.
+		&mt(' at ').$udom.'</font></h3>');
   }
-
 
   if ($ENV{'form.phase'} eq 'two') {
       &phasetwo($r,$fn,$uname,$udom);