From dd69bb2017f7dad5911f7117b7863f20baae83b1 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 7 Jul 2004 07:08:29 +0000
Subject: remove non-useful prototypes ($)

---
 perl-install/modules.pm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/modules.pm b/perl-install/modules.pm
index 4a1675aef..d8180256f 100644
--- a/perl-install/modules.pm
+++ b/perl-install/modules.pm
@@ -197,13 +197,13 @@ sub remove_probeall {
     log::l("setting probeall $alias to @$l");
 }
 
-sub remove_alias($) {
+sub remove_alias {
     my ($name) = @_;
     log::l(qq(removing alias "$name"));
     remove_alias_regexp("^$name\$");
 }
 
-sub remove_alias_regexp($) {
+sub remove_alias_regexp {
     my ($aliased) = @_;
     log::l(qq(removing all aliases that match "$aliased"));
     foreach (keys %conf) {
@@ -215,7 +215,7 @@ sub remove_alias_regexp($) {
     }
 }
 
-sub remove_alias_regexp_byname($) {
+sub remove_alias_regexp_byname {
     my ($name) = @_;
     log::l(qq(removing all aliases which names match "$name"));
     foreach (keys %conf) {
@@ -223,7 +223,7 @@ sub remove_alias_regexp_byname($) {
     }
 }
 
-sub remove_module($) {
+sub remove_module {
     my ($name) = @_;
     remove_alias($name);
     log::l("removing module $name");
-- 
cgit v1.2.1