diff options
author | mkanat%kerio.com <> | 2005-08-09 14:58:58 +0200 |
---|---|---|
committer | mkanat%kerio.com <> | 2005-08-09 14:58:58 +0200 |
commit | 42a0e99d5c916b4123719d7a362e12e65e15fc2f (patch) | |
tree | 4f93a13b5360e7621601384e04e70dc455ff0c46 /Bugzilla/Group.pm | |
parent | 51f0717b4285af69f22b635751b6f4a62d1f7da8 (diff) | |
download | bugzilla-42a0e99d5c916b4123719d7a362e12e65e15fc2f.tar.gz bugzilla-42a0e99d5c916b4123719d7a362e12e65e15fc2f.tar.xz |
Bug 303669: Bugzilla mis-uses perl subroutine prototypes
Patch By Max Kanat-Alexander <mkanat@bugzilla.org> r=LpSolit, a=justdave
Diffstat (limited to 'Bugzilla/Group.pm')
-rw-r--r-- | Bugzilla/Group.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Bugzilla/Group.pm b/Bugzilla/Group.pm index 808860274..e24ccb254 100644 --- a/Bugzilla/Group.pm +++ b/Bugzilla/Group.pm @@ -106,7 +106,7 @@ sub is_active { return $_[0]->{'isactive'}; } ##### Module Subroutines ### ################################ -sub ValidateGroupName ($$) { +sub ValidateGroupName { my ($name, @users) = (@_); my $dbh = Bugzilla->dbh; my $query = "SELECT id FROM groups " . @@ -125,7 +125,7 @@ sub ValidateGroupName ($$) { return $ret; } -sub get_group_controls_by_product ($) { +sub get_group_controls_by_product { my ($product_id) = @_; my $dbh = Bugzilla->dbh; |