Bug 303669: Bugzilla mis-uses perl subroutine prototypes

Patch By Max Kanat-Alexander <mkanat@bugzilla.org> r=LpSolit, a=justdave

1 files changed, 4 insertions, 4 deletions

diff --git a/Bugzilla/User.pm b/Bugzilla/User.pm
index f9efcd248..5462aa5d4 100644
--- a/Bugzilla/User.pm
+++ b/Bugzilla/User.pm
@@ -1156,7 +1156,7 @@ sub get_userlist {
     return $self->{'userlist'};
 }
 
-sub insert_new_user ($$;$$) {
+sub insert_new_user {
     my ($username, $realname, $password, $disabledtext) = (@_);
     my $dbh = Bugzilla->dbh;
 
@@ -1201,7 +1201,7 @@ sub insert_new_user ($$;$$) {
     return $password;
 }
 
-sub is_available_username ($;$) {
+sub is_available_username {
     my ($username, $old_username) = @_;
 
     if(login_to_id($username) != 0) {
@@ -1237,7 +1237,7 @@ sub is_available_username ($;$) {
     return 1;
 }
 
-sub login_to_id ($) {
+sub login_to_id {
     my ($login) = (@_);
     my $dbh = Bugzilla->dbh;
     # $login will only be used by the following SELECT statement, so it's safe.
@@ -1252,7 +1252,7 @@ sub login_to_id ($) {
     }
 }
 
-sub UserInGroup ($) {
+sub UserInGroup {
     return defined Bugzilla->user->groups->{$_[0]} ? 1 : 0;
 }