--- loncom/homework/optionresponse.pm	2013/12/03 14:54:29	1.192
+++ loncom/homework/optionresponse.pm	2013/12/03 17:22:08	1.193
@@ -1,7 +1,7 @@
 # LearningOnline Network with CAPA
 # option list style responses
 #
-# $Id: optionresponse.pm,v 1.192 2013/12/03 14:54:29 bisitz Exp $
+# $Id: optionresponse.pm,v 1.193 2013/12/03 17:22:08 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -120,17 +120,22 @@ sub start_foilgroup {
     }
     my $insertlist=&Apache::edit::insertlist($target,$token);
     $result.=&Apache::edit::start_table($token);
+    my %lt = &Apache::lonlocal::texthash(
+        sel => 'Select Options',
+        add => 'Add new Option:',
+        del => 'Delete an Option:',
+    );
     $result.= (<<ENDTABLE);
-      <tr><td>Select Options</td>
+      <tr><td>$lt{'sel'}</td>
         <td>
-	  Add new Option: <input type="text" name="$Apache::lonxml::curdepth.options" />
+	  $lt{'add'} <input type="text" name="$Apache::lonxml::curdepth.options" />
         </td>
-        <td>Delete an Option:
+        <td>$lt{'del'}
 	  <select name="$Apache::lonxml::curdepth.deleteopt">$optionlist</select>
         </td>
 ENDTABLE
     $result.= '<td>'.&Apache::edit::checked_arg('Print options:','texoptions',
-					 [ ['nochoice','Don\'t show option list'] ]
+					 [ ['nochoice',"Don't show option list"] ]
 					 ,$token).'</td>';
     $result.= '<td><label>'.&mt('Two-option checkboxes for:').
               '<select name="checkboxvalue_'.$Apache::lonxml::curdepth.'">';
@@ -143,7 +148,7 @@ ENDTABLE
     }
     $result.='</select></label>';
     $result.=&Apache::edit::checked_arg('Checkbox options:','checkboxoptions',
-                                         [ ['nochoice','Don\'t show option list'] ]
+                                         [ ['nochoice',"Don't show option list"] ]
                                          ,$token).'</td>';
     $result.= &Apache::edit::end_row();
     $result.= &Apache::edit::start_spanning_row();