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