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

matthew lon-capa-cvs@mail.lon-capa.org
Mon, 27 Sep 2004 15:20:24 -0000


matthew		Mon Sep 27 11:20:24 2004 EDT

  Modified files:              
    /loncom/interface	londocs.pm 
  Log:
  Added <label>s for checkboxes.
  
  
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.146 loncom/interface/londocs.pm:1.147
--- loncom/interface/londocs.pm:1.146	Sat Sep 18 13:06:57 2004
+++ loncom/interface/londocs.pm	Mon Sep 27 11:20:23 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Documents
 #
-# $Id: londocs.pm,v 1.146 2004/09/18 17:06:57 albertel Exp $
+# $Id: londocs.pm,v 1.147 2004/09/27 15:20:23 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1161,9 +1161,12 @@
 	if ($folderpath) { $folderpath.='&' };
 	$folderpath.=$folderarg.'&'.$foldername;
 	$url.='folderpath='.&Apache::lonnet::escape($folderpath);
-	$parameterset=&mt('Randomly Pick: ').
+	$parameterset='<label>'.&mt('Randomly Pick: ').
 	    '<input type="text" size="4" name="randpick_'.$orderidx.'" value="'.
-	    (&Apache::lonratedt::getparameter($orderidx,'parameter_randompick'))[0].'" />';
+	    (&Apache::lonratedt::getparameter($orderidx,
+                                              'parameter_randompick'))[0].
+                                              '" />'.'</label>';
+       
     }
     if ($ispage) {
         my $pagename=&Apache::lonnet::escape($pagetitle);
@@ -1187,9 +1190,9 @@
 	    ((&Apache::lonratedt::getparameter($orderidx,'parameter_hiddenresource'))[0]=~/^yes$/i?' checked="1"':'');
 	$line.=(<<ENDPARMS);
 <td bgcolor="#BBBBFF"><font size='-2'>
-<input type="checkbox" name="hidprs_$orderidx" $hidtext/> $lt{'hd'}</td>
+<nobr><label><input type="checkbox" name="hidprs_$orderidx" $hidtext/> $lt{'hd'}</label></nobr></td>
 <!--<td bgcolor="#BBBBFF"><font size='-2'>
-<input type="checkbox" name="encprs_$orderidx" $enctext/> $lt{'ec'}</td>-->
+<nobr><label><input type="checkbox" name="encprs_$orderidx" $enctext/> $lt{'ec'}</label></nobr></td>-->
 <td bgcolor="#BBBBFF"><font size="-2">$parameterset</font></td>
 <td bgcolor="#BBBBFF"><font size='-2'>
 <input type="submit" value="$lt{'sp'}" />