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/editcomponents.cgi b/editcomponents.cgi
index c25f971fc..31b0a1171 100755
--- a/editcomponents.cgi
+++ b/editcomponents.cgi
@@ -49,7 +49,7 @@ my $showbugcounts = (defined $cgi->param('showbugcounts'));
 # TestComponent:  just returns if the specified product/component combination exists
 # CheckComponent: same check, optionally emit an error text
 
-sub TestProduct ($)
+sub TestProduct
 {
     my $prod = shift;
 
@@ -60,7 +60,7 @@ sub TestProduct ($)
     return FetchOneColumn();
 }
 
-sub CheckProduct ($)
+sub CheckProduct
 {
     my $prod = shift;
 
@@ -75,7 +75,7 @@ sub CheckProduct ($)
     }
 }
 
-sub TestComponent ($$)
+sub TestComponent
 {
     my ($prod, $comp) = @_;
 
@@ -89,7 +89,7 @@ sub TestComponent ($$)
     return FetchOneColumn();
 }
 
-sub CheckComponent ($$)
+sub CheckComponent
 {
     my ($prod, $comp) = @_;