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

Add ; after eval

Browse source
This commit is contained in:
Mercier Pierre-Olivier 2013-09-26 11:03:24 +02:00
commit 4e289ec442
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
ACU/Process.pm
View file

@ -64,7 +64,7 @@ sub do_work ($$$@)
eval { eval {
$parser->parse_string(${ $_[0]{argref} }); $parser->parse_string(${ $_[0]{argref} });
} };
if ($@) { if ($@) {
my $err = "Parse error: $@"; my $err = "Parse error: $@";
log ERROR, $err; log ERROR, $err;
@ -73,7 +73,7 @@ sub do_work ($$$@)
eval { eval {
return $subref->($given_args, $args); return $subref->($given_args, $args);
} };
if ($@) { if ($@) {
my $err = $@; my $err = $@;
log ERROR, $err; log ERROR, $err;
@ -94,7 +94,7 @@ sub register_no_parse ($$;$)
{ {
eval { eval {
return $subref->($given_arg, $_[0]{argref}); return $subref->($given_arg, $_[0]{argref});
} };
if ($@) { if ($@) {
my $err = $@; my $err = $@;
log ERROR, $err; log ERROR, $err;