epita-std/ACU
Archived
1
0
Fork 0
Code Releases Activity

Display warnings on process return

Browse source
This commit is contained in:
Mercier Pierre-Olivier 2013-11-13 01:01:04 +01:00
parent 0e92592d17
commit 4e35cabf62
2 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

4
process/files/intradata_get.pl
View file

@ -215,7 +215,7 @@ sub grades_new_bonus
if (-e "$basedir/$year/$project_id/traces/bonus/$login.xml") {
open my $xml, "<", "$basedir/$year/$project_id/traces/bonus/$login.xml" or die $!;
binmode $xml;
$trace = Trace->new($xml);
$trace = Trace->new(join '', <$xml>);
close $xml;
}
elsif ($delete) {
@ -242,7 +242,7 @@ sub grades_new_bonus
close $xml;
}
else {
log WARN, "Invalid login $line, line skiped";
warn "Invalid login $line, line skiped";
}
}
}