loncom/homework/lonhomework.pm - diff

Return to lonhomework.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.289, 2008/01/15 03:09:09	version 1.290, 2008/01/21 17:20:45
Line 712 sub handle_save_or_undo {	Line 712 sub handle_save_or_undo {
my $fs=Apache::File->new(">$filebak");	my $fs=Apache::File->new(">$filebak");
if (defined($fs)) {	if (defined($fs)) {
print $fs $$problem;	print $fs $$problem;
&Apache::lonxml::info("<b>".&mt("Making Backup to [_1]",
'<span class="LC_filename">'.
$filebak.'</span>').
"</b>");
} else {	} else {
&Apache::lonxml::info("<span class=\"LC_error\">".	&Apache::lonxml::info("<span class=\"LC_error\">".
&mt("Unable to make backup [_1]",	&mt("Unable to make backup [_1]",
Line 726 sub handle_save_or_undo {	Line 722 sub handle_save_or_undo {
my $fh=Apache::File->new(">$file");	my $fh=Apache::File->new(">$file");
if (defined($fh)) {	if (defined($fh)) {
print $fh $$result;	print $fh $$result;
&Apache::lonxml::info("<b>".&mt("Saving Modifications to [_1]",
'<span class="LC_filename">'.
$file.'</span>' )."</b>");
} else {	} else {
&Apache::lonxml::info('<span class="LC_error">'.	&Apache::lonxml::info('<span class="LC_error">'.
&mt("Unable to write to [_1]",	&mt("Unable to write to [_1]",