loncom/homework/structuretags.pm - diff

Return to structuretags.pm CVS log

Up to [LON-CAPA] / loncom / homework

Diff for /loncom/homework/structuretags.pm between versions 1.242 and 1.244

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

version 1.242, 2004/02/16 20:30:34	version 1.244, 2004/03/08 23:18:21
Line 183 sub setup_rndseed {	Line 183 sub setup_rndseed {
sub problem_edit_header {	sub problem_edit_header {
return '<input type="hidden" name="submitted" value="edit" />	return '<input type="hidden" name="submitted" value="edit" />
<input type="hidden" name="problemmode" value="'.&mt('Edit').'" />	<input type="hidden" name="problemmode" value="'.&mt('Edit').'" />
<input type="submit" name="problemmode" value="'.&mt('Discard Edits and View').'" />	<input type="submit" name="problemmode" accesskey="d" value="'.&mt('Discard Edits and View').'" />
<input type="submit" name="problemmode" value="'.&mt('EditXML').'" />	<input type="submit" name="problemmode" accesskey="x" value="'.&mt('EditXML').'" />
<input type="submit" name="Undo" value="'.&mt('undo').'" /> <hr />	<input type="submit" name="Undo" accesskey="u" value="'.&mt('undo').'" /> <hr />
<input type="submit" name="submit" value="'.&mt('Submit Changes and Edit').'" />	<input type="submit" name="submit" accesskey="s" value="'.&mt('Submit Changes and Edit').'" />
<input type="submit" name="submit" value="'.&mt('Submit Changes and View').'" /><table><tr><td>'.	<input type="submit" name="submit" accesskey="v" value="'.&mt('Submit Changes and View').'" /><table><tr><td>'.
&Apache::loncommon::help_open_topic('Problem_Editor_XML_Index',	&Apache::loncommon::help_open_topic('Problem_Editor_XML_Index',
'Problem Editing Help').'</td><td>'.	'Problem Editing Help').'</td><td>'.
&Apache::loncommon::help_open_faq(5).	&Apache::loncommon::help_open_faq(5).
Line 213 sub option {	Line 213 sub option {
sub problem_web_to_edit_header {	sub problem_web_to_edit_header {
my ($rndseed)=@_;	my ($rndseed)=@_;
my $result.='<input type="hidden" name="problemmode" value="'.&mt('View').'" />	my $result.='<input type="hidden" name="problemmode" value="'.&mt('View').'" />
<input type="submit" name="problemmode" value="'.&mt('Edit').'" />	<input type="submit" name="problemmode" accesskey="e" value="'.&mt('Edit').'" />
<input type="submit" name="problemmode" value="'.&mt('EditXML').'" />	<input type="submit" name="problemmode" accesskey="x" value="'.&mt('EditXML').'" />
<input type="submit" name="newrandomization" value="'.&mt('New Randomization').'" />	<input type="submit" name="newrandomization" accesskey="a" value="'.&mt('New Randomization').'" />
<input type="submit" name="resetdata" value="'.&mt('Reset Submissions').'" />	<input type="submit" name="resetdata" accesskey="r" value="'.&mt('Reset Submissions').'" />
<nobr><input type="submit" name="changerandseed" value="'.&mt('Change Random Seed To:').'" />	<nobr><input type="submit" name="changerandseed" value="'.&mt('Change Random Seed To:').'" />
<input type="text" name="rndseed" width="10" value="'.	<input type="text" name="rndseed" width="10" value="'.
$rndseed.'"	$rndseed.'"
Line 656 sub end_problem {	Line 656 sub end_problem {
sub start_library {	sub start_library {
my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_;	my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_;
my ($result,$head_tag_start,$body_tag_start,$form_tag_start);	my ($result,$head_tag_start,$body_tag_start,$form_tag_start);
if ($$tagstack[0] eq 'library') { &init_problem_globals('library') };	if ($$tagstack[0] eq 'library') {
	&init_problem_globals('library');
	$Apache::lonhomework::type='problem';
	}
if ($target eq 'edit') {	if ($target eq 'edit') {
($result,$head_tag_start,$body_tag_start,$form_tag_start)=	($result,$head_tag_start,$body_tag_start,$form_tag_start)=
&page_start($target,$token,$tagstack,$parstack,$parser,$safeeval);	&page_start($target,$token,$tagstack,$parstack,$parser,$safeeval);

Removed from v.1.242
changed lines
	Added in v.1.244