[LON-CAPA-cvs] cvs: loncom(version_2_11_X) /interface lonquickgrades.pm

[raeburn]

raeburn		Sat Dec  1 16:38:06 2018 EDT

  Modified files:              (Branch: version_2_11_X)
    /loncom/interface	lonquickgrades.pm 
  Log:
  - For 2.11
    - Declarations needed following changes in rev. 1.49.6.4
  
  
Index: loncom/interface/lonquickgrades.pm
diff -u loncom/interface/lonquickgrades.pm:1.49.6.4 loncom/interface/lonquickgrades.pm:1.49.6.5
--- loncom/interface/lonquickgrades.pm:1.49.6.4	Tue Sep 11 02:44:58 2018
+++ loncom/interface/lonquickgrades.pm	Sat Dec  1 16:38:06 2018
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Quick Student Grades Display
 #
-# $Id: lonquickgrades.pm,v 1.49.6.4 2018/09/11 02:44:58 raeburn Exp $
+# $Id: lonquickgrades.pm,v 1.49.6.5 2018/12/01 16:38:06 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -93,7 +93,7 @@
                            &mt('Your course session is being updated because of recent changes by course personnel.').
                            ' '.&mt('Please be patient.').'<br /></div>'.
                            '<div style="padding:0;clear:both;margin:0;border:0"></div>';
-            %prog_state = &Apache::lonhtmlcommon::Create_PrgWin($r,undef,$preamble);
+            my %prog_state = &Apache::lonhtmlcommon::Create_PrgWin($r,undef,$preamble);
             &Apache::lonhtmlcommon::Update_PrgWin($r,\%prog_state,&mt('Updating course'));
             $r->rflush();
             my ($furl,$ferr) = &Apache::lonuserstate::readmap("$cdom/$cnum");
@@ -288,7 +288,7 @@
     $r->print(&Apache::loncommon::start_data_table()
              .&Apache::loncommon::start_data_table_header_row()
              .'<th>'.&mt('Folder').'</th>');
-    $title = &mt($showPoints ? "Points Scored" : "Done");
+    my $title = &mt($showPoints ? "Points Scored" : "Done");
     if ($totalAttempted) {
 	$title .= " / " . &mt("Attempted");
     }