[LON-CAPA-cvs] cvs: loncom /homework inputtags.pm

[albertel]

albertel		Tue Feb 24 17:34:51 2004 EDT

  Modified files:              
    /loncom/homework	inputtags.pm 
  Log:
  - in survey mode say Submissions not tries (BUG#2756)
  
  
Index: loncom/homework/inputtags.pm
diff -u loncom/homework/inputtags.pm:1.130 loncom/homework/inputtags.pm:1.131
--- loncom/homework/inputtags.pm:1.130	Thu Feb 12 10:50:33 2004
+++ loncom/homework/inputtags.pm	Tue Feb 24 17:34:51 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # input  definitons
 #
-# $Id: inputtags.pm,v 1.130 2004/02/12 15:50:33 sakharuk Exp $
+# $Id: inputtags.pm,v 1.131 2004/02/24 22:34:51 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -677,15 +677,17 @@
     if ( $tries eq '' ) { $tries = '0'; }
     if ( $maxtries eq '' ) { $maxtries = '2'; } 
     if ( $maxtries eq 'con_lost' ) { $maxtries = '0'; } 
+    my $tries_text=&mt('Tries');
+    if ( $Apache::lonhomework::type eq 'survey') { $tries_text=&mt('Submissions'); }
     if ( $showbutton ) {
       if ($target eq 'tex') {
 	  if ($ENV{'request.state'} ne "construct" && $Apache::lonhomework::type ne 'exam') {
-	      $trystr = ' {\vskip 1 mm \small \textit{'.&mt('Tries').'} '.$tries.'/'.$maxtries.'} \vskip 2 mm ';
+	      $trystr = ' {\vskip 1 mm \small \textit{'.$tries_text.'} '.$tries.'/'.$maxtries.'} \vskip 2 mm ';
 	  } else {
 	      $trystr = '\vskip 0 mm ';
 	  }
       } else {
-	  $trystr = "<td>".&mt('Tries')." $tries";
+	  $trystr = "<td>".$tries_text." $tries";
 	  if($ENV{'request.state'} ne 'construct') {
 	      $trystr.="/$maxtries";
 	  } else {