[LON-CAPA-cvs] cvs: loncom /imspackages imsprocessor.pm

[raeburn]

raeburn		Wed May  2 17:08:42 2018 EDT

  Modified files:              
    /loncom/imspackages	imsprocessor.pm 
  Log:
  - Use three-argument open() to separate file mode from the filename.
  
  
Index: loncom/imspackages/imsprocessor.pm
diff -u loncom/imspackages/imsprocessor.pm:1.56 loncom/imspackages/imsprocessor.pm:1.57
--- loncom/imspackages/imsprocessor.pm:1.56	Sun Nov  5 22:47:13 2017
+++ loncom/imspackages/imsprocessor.pm	Wed May  2 17:08:40 2018
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Processor for IMS Packages
 #
-# $Id: imsprocessor.pm,v 1.56 2017/11/05 22:47:13 raeburn Exp $
+# $Id: imsprocessor.pm,v 1.57 2018/05/02 17:08:40 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -140,7 +140,7 @@
         unless ($fname) { return 'error: no uploaded file'; }
 # Save the file
         chomp($env{'form.uploadname'});
-        open(my $fh,'>'.$tempdir.'/'.$fname);
+        open(my $fh,'>',"$tempdir/$fname");
         print $fh $env{'form.uploadname'};
         close($fh);
     } elsif ($context eq 'CSTR') {