loncom/homework/lonhomework.pm - diff

Return to lonhomework.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.261, 2006/10/17 15:11:11	version 1.262, 2006/11/30 01:14:17
Line 657 sub handle_save_or_undo {	Line 657 sub handle_save_or_undo {
my $filebak =$file.".bak";	my $filebak =$file.".bak";
my $filetmp =$file.".tmp";	my $filetmp =$file.".tmp";
my $error=0;	my $error=0;

&Apache::lonnet::correct_line_ends($result);

if ($env{'form.Undo'} eq &mt('undo')) {	if ($env{'form.Undo'} eq &mt('undo')) {
my $error=0;	my $error=0;
if (!copy($file,$filetmp)) { $error=1; }	if (!copy($file,$filetmp)) { $error=1; }
Line 672 sub handle_save_or_undo {	Line 669 sub handle_save_or_undo {
$error=1;	$error=1;
}	}
} else {	} else {
	&Apache::lonnet::correct_line_ends($result);
my $fs=Apache::File->new(">$filebak");	my $fs=Apache::File->new(">$filebak");
if (defined($fs)) {	if (defined($fs)) {
print $fs $$problem;	print $fs $$problem;