diff options
| author | ivan <ivan> | 2007-08-01 22:26:52 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2007-08-01 22:26:52 +0000 |
| commit | eb4ff7f73c5d4bdf74a3472448b5a195598ff4cd (patch) | |
| tree | bb38241e8c865c3bca861da7749071feeadd2b5b /FS/FS/access_group.pm | |
| parent | 32b5d3a31f112a381f0a15ac5e3a2204242f3405 (diff) | |
event refactor, landing on HEAD!
Diffstat (limited to 'FS/FS/access_group.pm')
| -rw-r--r-- | FS/FS/access_group.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/FS/FS/access_group.pm b/FS/FS/access_group.pm index 2519040..b5b693a 100644 --- a/FS/FS/access_group.pm +++ b/FS/FS/access_group.pm @@ -140,7 +140,7 @@ test if this group has the given RIGHTNAME. =cut sub access_right { - my( $self, $name ) = shift; + my( $self, $name ) = @_; qsearchs('access_right', { 'righttype' => 'FS::access_group', 'rightobjnum' => $self->groupnum, 'rightname' => $name, |