[LON-CAPA-cvs] cvs: loncom /homework lonhomework.pm structuretags.pm /xml londefdef.pm lonxml.pm

matthew lon-capa-cvs@mail.lon-capa.org
Tue, 02 Mar 2004 20:59:25 -0000


matthew		Tue Mar  2 15:59:25 2004 EDT

  Modified files:              
    /loncom/xml	londefdef.pm lonxml.pm 
    /loncom/homework	structuretags.pm lonhomework.pm 
  Log:
  Added keyboard shortcuts to construction space editing.
  
  
Index: loncom/xml/londefdef.pm
diff -u loncom/xml/londefdef.pm:1.199 loncom/xml/londefdef.pm:1.200
--- loncom/xml/londefdef.pm:1.199	Thu Feb 19 14:57:48 2004
+++ loncom/xml/londefdef.pm	Tue Mar  2 15:59:24 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Tags Default Definition Module 
 #
-# $Id: londefdef.pm,v 1.199 2004/02/19 19:57:48 albertel Exp $
+# $Id: londefdef.pm,v 1.200 2004/03/02 20:59:24 matthew Exp $
 # 
 #
 # Copyright Michigan State University Board of Trustees
@@ -535,7 +535,7 @@
 	if ($ENV{'request.state'} ne 'published') {
 	    $currentstring.=(<<EDITBUTTON);
 		<form method="post">
-		<input type="submit" name="editmode" value="Edit" />
+		<input type="submit" name="editmode" accesskey="e" value="Edit" />
 		</form>
 EDITBUTTON
 	} else {
Index: loncom/xml/lonxml.pm
diff -u loncom/xml/lonxml.pm:1.303 loncom/xml/lonxml.pm:1.304
--- loncom/xml/lonxml.pm:1.303	Thu Feb 26 18:39:03 2004
+++ loncom/xml/lonxml.pm	Tue Mar  2 15:59:24 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # XML Parser Module 
 #
-# $Id: lonxml.pm,v 1.303 2004/02/26 23:39:03 albertel Exp $
+# $Id: lonxml.pm,v 1.304 2004/03/02 20:59:24 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1157,8 +1157,8 @@
 					 'ed' => 'Edit');
       my $buttons=(<<BUTTONS);
 $cleanbut
-<input type="submit" name="savethisfile" value="$lt{'st'}" />
-<input type="submit" name="viewmode" value="$lt{'vi'}" />
+<input type="submit" name="savethisfile" accesskey="s"  value="$lt{'st'}" />
+<input type="submit" name="viewmode" accesskey="v" value="$lt{'vi'}" />
 BUTTONS
       my $editfooter=(<<ENDFOOTER);
 <hr />
Index: loncom/homework/structuretags.pm
diff -u loncom/homework/structuretags.pm:1.242 loncom/homework/structuretags.pm:1.243
--- loncom/homework/structuretags.pm:1.242	Mon Feb 16 15:30:34 2004
+++ loncom/homework/structuretags.pm	Tue Mar  2 15:59:25 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA 
 # definition of tags that give a structure to a document
 #
-# $Id: structuretags.pm,v 1.242 2004/02/16 20:30:34 albertel Exp $
+# $Id: structuretags.pm,v 1.243 2004/03/02 20:59:25 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -183,11 +183,11 @@
 sub problem_edit_header {
     return '<input type="hidden" name="submitted" value="edit" />
        <input type="hidden" name="problemmode" value="'.&mt('Edit').'" />
-       <input type="submit" name="problemmode" value="'.&mt('Discard Edits and View').'" />
-       <input type="submit" name="problemmode" value="'.&mt('EditXML').'" />
-       <input type="submit" name="Undo" value="'.&mt('undo').'" /> <hr />
-       <input type="submit" name="submit" value="'.&mt('Submit Changes and Edit').'" />
-       <input type="submit" name="submit" value="'.&mt('Submit Changes and View').'" /><table><tr><td>'.
+       <input type="submit" name="problemmode" accesskey="d" value="'.&mt('Discard Edits and View').'" />
+       <input type="submit" name="problemmode" accesskey="x" value="'.&mt('EditXML').'" />
+       <input type="submit" name="Undo" accesskey="u" value="'.&mt('undo').'" /> <hr />
+       <input type="submit" name="submit" accesskey="s" value="'.&mt('Submit Changes and Edit').'" />
+       <input type="submit" name="submit" accesskey="v" value="'.&mt('Submit Changes and View').'" /><table><tr><td>'.
        &Apache::loncommon::help_open_topic('Problem_Editor_XML_Index',
 					   'Problem Editing Help').'</td><td>'.
        &Apache::loncommon::help_open_faq(5).
@@ -213,10 +213,10 @@
 sub problem_web_to_edit_header {
     my ($rndseed)=@_;
     my $result.='<input type="hidden" name="problemmode" value="'.&mt('View').'" />
-             <input type="submit" name="problemmode" value="'.&mt('Edit').'" />
-             <input type="submit" name="problemmode" value="'.&mt('EditXML').'" />
-             <input type="submit" name="newrandomization" value="'.&mt('New Randomization').'" />
-             <input type="submit" name="resetdata" value="'.&mt('Reset Submissions').'" />
+             <input type="submit" name="problemmode" accesskey="e" value="'.&mt('Edit').'" />
+             <input type="submit" name="problemmode" accesskey="x" value="'.&mt('EditXML').'" />
+             <input type="submit" name="newrandomization" accesskey="a" value="'.&mt('New Randomization').'" />
+             <input type="submit" name="resetdata" accesskey="r" value="'.&mt('Reset Submissions').'" />
              <nobr><input type="submit" name="changerandseed" value="'.&mt('Change Random Seed To:').'" />
               <input type="text" name="rndseed" width="10" value="'.
 	       $rndseed.'"
Index: loncom/homework/lonhomework.pm
diff -u loncom/homework/lonhomework.pm:1.169 loncom/homework/lonhomework.pm:1.170
--- loncom/homework/lonhomework.pm:1.169	Mon Feb 23 18:29:47 2004
+++ loncom/homework/lonhomework.pm	Tue Mar  2 15:59:25 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Homework handler
 #
-# $Id: lonhomework.pm,v 1.169 2004/02/23 23:29:47 albertel Exp $
+# $Id: lonhomework.pm,v 1.170 2004/03/02 20:59:25 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -553,12 +553,12 @@
             <form name="lonhomework" method="POST" action="'.
 	    $ENV{'request.uri'}.'">
             <input type="hidden" name="problemmode" value="'.&mt('EditXML').'" />
-            <input type="submit" name="problemmode" value="'.&mt('Discard Edits and View').'" />
-            <input type="submit" name="problemmode" value="'.&mt('Edit').'" />
+            <input type="submit" name="problemmode" accesskey="d" value="'.&mt('Discard Edits and View').'" />
+            <input type="submit" name="problemmode" accesskey="e" value="'.&mt('Edit').'" />
             <hr />
-            <input type="submit" name="submit" value="'.&mt('Submit Changes').'" />
-            <input type="submit" name="submit" value="'.&mt('Submit Changes and View').'" />
-            <input type="submit" name="Undo" value="'.&mt('undo').'" />
+            <input type="submit" name="submit" accesskey="s" value="'.&mt('Submit Changes').'" />
+            <input type="submit" name="submit" accesskey="v" value="'.&mt('Submit Changes and View').'" />
+            <input type="submit" name="Undo" accesskey="u" value="'.&mt('undo').'" />
             <hr />
             ' . $xml_help . '
             <textarea rows="'.$rows.'" cols="'.$cols.'" name="editxmltext">'.
@@ -709,8 +709,8 @@
     $request->print(<<EDITMENU);
 <body bgcolor="#FFFFFF">
 <form action="$url" method="POST">
-$lt{'would'} <input type="submit" name="problemmode" value="&lt{'view'}">
-&lt{'or'} <input type="submit" name="problemmode" value="&lt{'Edit'}">
+$lt{'would'} <input type="submit" name="problemmode" accesskey="v" value="&lt{'view'}">
+&lt{'or'} <input type="submit" name="problemmode" accesskey="e" value="&lt{'Edit'}">
 &lt{'the problem'}.
 </form>
 </body>