loncom/interface/lonmeta.pm - diff

Return to lonmeta.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.228, 2009/04/04 00:38:13	version 1.229, 2009/04/04 20:06:37
Line 578 sub relatedfield {	Line 578 sub relatedfield {
return $relatedsep.' ';	return $relatedsep.' ';
}	}
return $relatedsep.'<input type="checkbox" name="'.$fieldname.'_related"'.	return $relatedsep.'<input type="checkbox" name="'.$fieldname.'_related"'.
($relatedvalue?' checked="1"':'').' />';	($relatedvalue?' checked="checked"':'').' />';
}	}

sub prettyinput {	sub prettyinput {
Line 691 sub prettyinput {	Line 691 sub prettyinput {
# Obsolete	# Obsolete
if ($type eq 'obsolete') {	if ($type eq 'obsolete') {
return '<input type="checkbox" name="'.$fieldname.'"'.	return '<input type="checkbox" name="'.$fieldname.'"'.
($value?' checked="1"':'').' />'.	($value?' checked="checked"':'').' />'.
&relatedfield(0,$relatedsearchflag,$relatedsep);	&relatedfield(0,$relatedsearchflag,$relatedsep);
}	}
# Obsolete replacement file	# Obsolete replacement file