[LON-CAPA-cvs] cvs: loncom /interface lontrackstudent.pm

raeburn raeburn at source.lon-capa.org
Sun Nov 12 18:06:51 EST 2017


raeburn		Sun Nov 12 23:06:51 2017 EDT

  Modified files:              
    /loncom/interface	lontrackstudent.pm 
  Log:
  - Use three-argument open() to separate file mode from the filename.
  
  
Index: loncom/interface/lontrackstudent.pm
diff -u loncom/interface/lontrackstudent.pm:1.39 loncom/interface/lontrackstudent.pm:1.40
--- loncom/interface/lontrackstudent.pm:1.39	Sun Nov 12 22:19:56 2017
+++ loncom/interface/lontrackstudent.pm	Sun Nov 12 23:06:51 2017
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lontrackstudent.pm,v 1.39 2017/11/12 22:19:56 raeburn Exp $
+# $Id: lontrackstudent.pm,v 1.40 2017/11/12 23:06:51 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -185,7 +185,7 @@
     &Apache::lonhtmlcommon::Update_PrgWin
         ($r,$prog_state,&mt('Parsing results'));
     #
-    if (! open(TIMEDATA,$results_file)) {
+    if (! open(TIMEDATA,"<",$results_file)) {
         $r->print('<p class="LC_error">'.&mt('Unable to read results file.').'</p>'.
                   '<p>'.
                   &mt('This is a serious error and has been logged.').
@@ -254,7 +254,7 @@
         $r->print('<p class="LC_info">'.&mt('So far, no data has been returned for your request').'</p>');
         return -1;
     }
-    if (! open(ACTIVITYDATA,$results_file)) {
+    if (! open(ACTIVITYDATA,"<",$results_file)) {
         $r->print('<p class="LC_error">'.&mt('Unable to read results file.').'</p>'.
                   '<p>'.
                   &mt('This is a serious error and has been logged.').




More information about the LON-CAPA-cvs mailing list