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

schafran lon-capa-cvs-allow@mail.lon-capa.org
Sun, 23 Nov 2008 15:48:27 -0000


schafran		Sun Nov 23 15:48:27 2008 EDT

  Modified files:              
    /loncom/interface	lonmsgdisplay.pm 
  Log:
  consistent and short button values like "Send", the longer description "Send reply to message" is set as title.
  
  
Index: loncom/interface/lonmsgdisplay.pm
diff -u loncom/interface/lonmsgdisplay.pm:1.96 loncom/interface/lonmsgdisplay.pm:1.97
--- loncom/interface/lonmsgdisplay.pm:1.96	Mon Nov 17 17:19:52 2008
+++ loncom/interface/lonmsgdisplay.pm	Sun Nov 23 15:48:27 2008
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines for messaging display
 #
-# $Id: lonmsgdisplay.pm,v 1.96 2008/11/17 17:19:52 schafran Exp $
+# $Id: lonmsgdisplay.pm,v 1.97 2008/11/23 15:48:27 schafran Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1571,7 +1571,7 @@
 $dispcrit
 $disbase
 ENDCOMP
-        $r->print(&submit_button_row($folder,$dismode,&mt($func1),
+        $r->print(&submit_button_row($folder,$dismode,&mt($func1.' '.$func2{'ma'}),
                                      \%lt,$hasfloat,$group));
         $r->print($citation);
         if (exists($env{'form.ref'})) {
@@ -1688,7 +1688,7 @@
     }
     $output .= qq|
 <table><tr><td align="left">
-<input type="submit" name="send" value="$sendtext" />
+<input type="submit" name="send" value="Send" title="$sendtext" />
 <input type="submit" name="cancel" value="$lt->{'ca'}" />
 </td><td width="60">&nbsp;</td><td align="right">$prevbutton</td></tr></table>
 |;