diff options
Diffstat (limited to 'lib/GitACL/File.pm')
-rw-r--r-- | lib/GitACL/File.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/GitACL/File.pm b/lib/GitACL/File.pm index 8842ffd..efabfd4 100644 --- a/lib/GitACL/File.pm +++ b/lib/GitACL/File.pm | |||
@@ -1,5 +1,5 @@ | |||
1 | # This file is part of gitaclhook -*- perl -*- | 1 | # This file is part of gitaclhook -*- perl -*- |
2 | # Copyright (C) 2013 Sergey Poznyakoff <gray@gnu.org> | 2 | # Copyright (C) 2013, 2014 Sergey Poznyakoff <gray@gnu.org> |
3 | # | 3 | # |
4 | # Gitaclhook is free software; you can redistribute it and/or modify | 4 | # Gitaclhook is free software; you can redistribute it and/or modify |
5 | # it under the terms of the GNU General Public License as published by | 5 | # it under the terms of the GNU General Public License as published by |
@@ -24,7 +24,7 @@ sub check_acl { | |||
24 | my @ret; | 24 | my @ret; |
25 | 25 | ||
26 | my $filename = GitACL::git_value('config', 'hooks.aclfile'); | 26 | my $filename = GitACL::git_value('config', 'hooks.aclfile'); |
27 | $self->allow("no ACL configured for ".$self->project_name) | 27 | $self->allow("no ACL configured for ".$self->{project_name}) |
28 | unless defined($filename); | 28 | unless defined($filename); |
29 | 29 | ||
30 | open($fd, "<", $filename) | 30 | open($fd, "<", $filename) |
@@ -52,7 +52,7 @@ sub check_acl { | |||
52 | exit(127); | 52 | exit(127); |
53 | } | 53 | } |
54 | close($fd); | 54 | close($fd); |
55 | $self->allow("default rule"); | 55 | $self->default_rule; |
56 | } | 56 | } |
57 | 57 | ||
58 | 1; | 58 | 1; |