--- loncom/homework/edit.pm 2003/06/09 22:42:49 1.54 +++ loncom/homework/edit.pm 2003/06/30 20:41:35 1.57 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # edit mode helpers # -# $Id: edit.pm,v 1.54 2003/06/09 22:42:49 albertel Exp $ +# $Id: edit.pm,v 1.57 2003/06/30 20:41:35 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -75,13 +75,7 @@ sub tag_end { my ($target,$token,$description) = @_; my $result=''; if ($target eq 'edit') { - my $tag=$token->[1]; - if (!defined($description)) { - $result.="</td></tr><tr><td></$tag></td><td colspan=\"2\"> </td>"; - } else { - if ($description ne '') { $result.="</td></tr><tr><td>$description</td><td colspan=\"2\"> </td>"; } - } - $result.="</tr>".&end_table()."\n"; + $result.="</td></tr>".&end_table()."\n"; } return $result; } @@ -524,7 +518,7 @@ sub text_arg { my $arg=$token->[2]{$name}; $result=$description.' <input name="'.&html_element_name($name). '" type="text" value="'.$arg.'" size="'.$size.'" />'; - return $result; + return '<nobr>'.$result.'</nobr>'; } sub select_arg { @@ -546,10 +540,10 @@ sub select_arg { $optionlist.="<option $value >$option</option>\n"; } } - $result.=$description.' <select name="'.&html_element_name($name). - '"> + $result.='<nobr>'.$description.' <select name="'. + &html_element_name($name).'"> '.$optionlist.' - </select>'; + </select></nobr>'; return $result; } @@ -583,7 +577,7 @@ sub select_or_text_arg { } else { $result.=&text_arg($description,$name,$token,$size); } - return $result; + return '<nobr>'.$result.'</nobr>'; } #----------------------------------------------------- image coordinates @@ -657,7 +651,7 @@ sub browse { $Apache::lonxml::curdepth); } my $result = <<"ENDBUTTON"; -<a href=\"javascript:openbrowser('$form','$element')\"\>Browse</a> +<a href=\"javascript:openbrowser('$form','$element')\"\>Select</a> ENDBUTTON return $result; }