loncom/xml/lonxml.pm - diff

Return to lonxml.pm CVS log

Up to [LON-CAPA] / loncom / xml

Diff for /loncom/xml/lonxml.pm between versions 1.427 and 1.428

version 1.427, 2006/11/23 22:11:21	version 1.428, 2006/11/30 01:07:09
Line 1335 FULLPAGE	Line 1335 FULLPAGE
my %lt=&Apache::lonlocal::texthash('st' => 'Save and Edit',	my %lt=&Apache::lonlocal::texthash('st' => 'Save and Edit',
'vi' => 'Save and View',	'vi' => 'Save and View',
'dv' => 'Discard Edits and View',	'dv' => 'Discard Edits and View',
	'un' => 'undo',
'ed' => 'Edit');	'ed' => 'Edit');
my $buttons=(<<BUTTONS);	my $buttons=(<<BUTTONS);
$cleanbut	$cleanbut
<input type="submit" name="discardview" accesskey="d" value="$lt{'dv'}" /><hr>	<input type="submit" name="discardview" accesskey="d" value="$lt{'dv'}" />
	<input type="submit" name="Undo" accesskey="u" value="$lt{'un'}" /><hr>
<input type="submit" name="savethisfile" accesskey="s" value="$lt{'st'}" />	<input type="submit" name="savethisfile" accesskey="s" value="$lt{'st'}" />
<input type="submit" name="viewmode" accesskey="v" value="$lt{'vi'}" />	<input type="submit" name="viewmode" accesskey="v" value="$lt{'vi'}" />
BUTTONS	BUTTONS
Line 1418 sub handler {	Line 1420 sub handler {
#	#
# Edit action? Save file.	# Edit action? Save file.
#	#
unless ($env{'request.state'} eq 'published') {	if (!($env{'request.state'} eq 'published')) {
if ($env{'form.savethisfile'} \|\| $env{'form.viewmode'}) {	if ($env{'form.savethisfile'} \|\| $env{'form.viewmode'} \|\| $env{'form.Undo'}) {
if (&storefile($file,$env{'form.filecont'})) {	my $problem=&Apache::lonnet::getfile($file);
&Apache::lonxml::info("<font COLOR=\"#0000FF\">".	my $error = &Apache::lonhomework::handle_save_or_undo($request, \$problem, \$env{'form.filecont'});
&mt('Updated').": ".
&Apache::lonlocal::locallocaltime(time).
" </font>");
}
}	}
}	}
my %mystyle;	my %mystyle;

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

Removed from v.1.427
changed lines
	Added in v.1.428