Diff for /loncom/homework/edit.pm between versions 1.118 and 1.119

version 1.118, 2008/11/18 19:14:28 version 1.119, 2008/12/10 21:02:01
Line 842  sub checked_arg { Line 842  sub checked_arg {
     $text=$option;      $text=$option;
     $value='value="'.$option.'"';      $value='value="'.$option.'"';
  }   }
  $result.="<nobr><label><input type=\"checkbox\" $value name=\"".   $result.='<span class="LC_nobreak"><label><input type="checkbox" '.$value.' name="'.
     &html_element_name($name)."\"";      &html_element_name($name).'"';
  foreach my $selected (split(/,/,$allselected)) {   foreach my $selected (split(/,/,$allselected)) {
     if ( $selected eq $option ) {      if ( $selected eq $option ) {
  $result.=" checked=\"checked\" ";   $result.=' checked="checked" ';
  last;   last;
     }      }
  }   }
  $result.=&element_change_detection()." />$text</label></nobr>\n";   $result.=&element_change_detection().' />'.$text.'</label></span>'."\n";
     }      }
     return $result;      return $result;
 }  }
Line 863  sub text_arg { Line 863  sub text_arg {
     $result=&mt($description).'&nbsp;<input name="'.&html_element_name($name).      $result=&mt($description).'&nbsp;<input name="'.&html_element_name($name).
  '" type="text" value="'.$arg.'" size="'.$size.'" '.   '" type="text" value="'.$arg.'" size="'.$size.'" '.
  &element_change_detection().'/>';   &element_change_detection().'/>';
     return '<nobr>'.$result.'</nobr>';      return '<span class="LC_nobreak">'.$result.'</span>';
 }  }
   
 sub select_arg {  sub select_arg {
Line 887  sub select_arg { Line 887  sub select_arg {
     $optionlist.="<option $value >".&mt($text)."</option>\n";      $optionlist.="<option $value >".&mt($text)."</option>\n";
  }   }
     }      }
     $result.='<nobr>'.&mt($description).'&nbsp;<select name="'.      $result.='<span class="LC_nobreak>'.&mt($description).'&nbsp;<select name="'.
  &html_element_name($name).'" '.&element_change_detection().' >   &html_element_name($name).'" '.&element_change_detection().' >
        '.$optionlist.'         '.$optionlist.'
       </select></nobr>';        </select></span>';
     return $result;      return $result;
 }  }
   
Line 936  sub select_or_text_arg { Line 936  sub select_or_text_arg {
     $description=&mt($description);      $description=&mt($description);
 #  #
     return (<<ENDSELECTORTYPE);      return (<<ENDSELECTORTYPE);
 <nobr>  <span class="LC_nobreak">
 $description  $description
 &nbsp;<select name="$selectelement"  &nbsp;<select name="$selectelement"
 onChange="if ($selectedvalue!='TYPEDINVALUE') { $hiddenvalue=$selectedvalue; $typedinvalue=''; }" >  onChange="if ($selectedvalue!='TYPEDINVALUE') { $hiddenvalue=$selectedvalue; $typedinvalue=''; }" >
Line 947  $optionlist Line 947  $optionlist
 onChange="$hiddenvalue=$typedinvalue;"  onChange="$hiddenvalue=$typedinvalue;"
 onFocus="$selectedindex=$selecttypeinindex-1;" />  onFocus="$selectedindex=$selecttypeinindex-1;" />
 <input type="hidden" name="$element" value="$selected" $change_code />  <input type="hidden" name="$element" value="$selected" $change_code />
 </nobr>  </span>
 ENDSELECTORTYPE  ENDSELECTORTYPE
 }  }
   

Removed from v.1.118  
changed lines
  Added in v.1.119


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>