diff options
| author | mkanat%kerio.com <> | 2005-08-13 21:27:03 +0200 |
|---|---|---|
| committer | mkanat%kerio.com <> | 2005-08-13 21:27:03 +0200 |
| commit | dddc17ec8b38d7f90b7be7d9fd6ab9629077f3df (patch) | |
| tree | 9836708e345769706c774f799701aa5b40b02cc5 /Bugzilla/Version.pm | |
| parent | 71a6b9cf80cd368fd3fd69d673ddf10142763e59 (diff) | |
| download | bugzilla-dddc17ec8b38d7f90b7be7d9fd6ab9629077f3df.tar.gz bugzilla-dddc17ec8b38d7f90b7be7d9fd6ab9629077f3df.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/Version.pm')
| -rw-r--r-- | Bugzilla/Version.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Bugzilla/Version.pm b/Bugzilla/Version.pm index 3a460e028..473a186c2 100644 --- a/Bugzilla/Version.pm +++ b/Bugzilla/Version.pm @@ -97,7 +97,7 @@ sub product_id { return $_[0]->{'product_id'}; } ##### Subroutines ### ############################### -sub get_versions_by_product ($) { +sub get_versions_by_product { my ($product_id) = @_; my $dbh = Bugzilla->dbh; @@ -123,7 +123,7 @@ sub get_versions_by_product ($) { return @versions; } -sub check_version ($$) { +sub check_version { my ($product, $version_name) = @_; $version_name || ThrowUserError('version_not_specified'); |