From 868f8ef6acc35e7f402f082fb8398c22bbd012b5 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux 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/loopback.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/loopback.pm') diff --git a/perl-install/loopback.pm b/perl-install/loopback.pm index 90097e3eb..be432c3a6 100644 --- a/perl-install/loopback.pm +++ b/perl-install/loopback.pm @@ -21,7 +21,7 @@ sub carryRootLoopback { } sub check_circular_mounts { - my ($hd, $part, $all_hds) = @_; + my ($_hd, $part, $all_hds) = @_; my $fstab = [ fsedit::get_all_fstab($all_hds), $part ]; # no pb if $part is already in $all_hds -- cgit v1.2.1