From 868f8ef6acc35e7f402f082fb8398c22bbd012b5 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 4 Dec 2002 21:22:16 +0000
Subject: remove unused variables or rename them with an underscore (eg: $o
 becomes $_o)

---
 perl-install/network/modem.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/network/modem.pm')

diff --git a/perl-install/network/modem.pm b/perl-install/network/modem.pm
index 08fafc265..87f042208 100644
--- a/perl-install/network/modem.pm
+++ b/perl-install/network/modem.pm
@@ -49,7 +49,7 @@ killall pppd
 }
 
 sub pppConfig {
-    my ($modem, $mouse, $netc, $intf) = @_;
+    my ($modem, $mouse, $netc, $_intf) = @_;
     $mouse ||= {};
 
     $mouse->{device} ||= readlink "$prefix/dev/mouse";
-- 
cgit v1.2.1