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

Grades: fix globing exponentiation

Browse source
This commit is contained in:
Mercier Pierre-Olivier 2014-01-14 00:58:44 +01:00
commit aa3b69f5b3
2 changed files with 2 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

2
ACU/Grading.pm
View file

@ -352,7 +352,7 @@ sub compute ($$$;$$$)
{
my $value = 0;
for my $r (grep { match_glob($ref, $_); } keys %$ids) {
$value += $ids->{ $r };
$value += $ids->{ $r } if ($ref != $r);
}
$ids->{ $ref } = $value if ($value);
log DEBUG, "New globbing identifier caculated $ref: $value";