loncom/homework/edit.pm - diff

Return to edit.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.71, 2003/11/05 21:53:48	version 1.73, 2003/11/28 01:55:24
Line 348 sub insert_optionresponse {	Line 348 sub insert_optionresponse {
</optionresponse>';	</optionresponse>';
}	}

	sub insert_organicresponse {
	return '
	<organicresponse>
	<textline />
	<hintgroup>
	<startouttext/>
	<endouttext />
	</hintgroup>
	</organicresponse>';
	}

	sub insert_organicstructure {
	return '
	<organicstructure />
	';
	}

sub insert_radiobuttonresponse {	sub insert_radiobuttonresponse {
return '	return '
<radiobuttonresponse max="10">	<radiobuttonresponse max="10">
Line 360 sub insert_radiobuttonresponse {	Line 377 sub insert_radiobuttonresponse {
</radiobuttonresponse>';	</radiobuttonresponse>';
}	}

	sub insert_reactionresponse {
	return '
	<reactionresponse>
	<textline />
	<hintgroup>
	<startouttext/>
	<endouttext />
	</hintgroup>
	</reactionresponse>';
	}

sub insert_rankresponse {	sub insert_rankresponse {
return '	return '
<rankresponse max="10">	<rankresponse max="10">
Line 649 sub select_or_text_arg {	Line 677 sub select_or_text_arg {
}	}
$optionlist.="<option value=\"TYPEDINVALUE\"".	$optionlist.="<option value=\"TYPEDINVALUE\"".
((!$found)?' selected="on"':'').	((!$found)?' selected="on"':'').
">".&mt('Type in value')."</option>\n";	">".&mt('Type-in value')."</option>\n";
#	#
my $element=&html_element_name($name);	my $element=&html_element_name($name);
my $selectelement='select_list_'.$element;	my $selectelement='select_list_'.$element;