--- loncom/publisher/lonupload.pm 2008/06/17 02:20:08 1.37
+++ loncom/publisher/lonupload.pm 2008/12/17 19:18:47 1.38.2.2
@@ -2,7 +2,7 @@
# The LearningOnline Network with CAPA
# Handler to upload files into construction space
#
-# $Id: lonupload.pm,v 1.37 2008/06/17 02:20:08 raeburn Exp $
+# $Id: lonupload.pm,v 1.38.2.2 2008/12/17 19:18:47 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -98,10 +98,11 @@ sub phaseone {
''.
''.&mt('Save uploaded file as ').
- "/priv/$uname/".
+ '" />'.&mt('Save uploaded file as [_1]',
+ '/priv/'.$uname.'/'.
'
'.
+ '" />').
+ '
'.
'
'.&mt('Choose file type:').'
'. &mt('The extension on this file is not recognized by LON-CAPA.'). - '
'; + ''; } elsif (-d $target) { $result .= &mt('File [_1] could not be copied.', ''.$fn.''). - ''. &mt('The target is an existing directory.'). - '
'; + ''; } elsif (copy($source,$target)) { chmod(0660, $target); # Set permissions to rw-rw---. if ($mode eq 'testbank' || $mode eq 'imsimport') { @@ -453,7 +455,7 @@ in an html file. upfile_store() : Store contents of uploaded file into temporary space. Invoked by phaseone subroutine. -= item * +=item * check_extension() : Checks if filename extension is permitted and checks type of file - if html file, calls parser to check for embedded objects.