summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-01-09 11:32:20 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-01-09 11:32:20 +0000
commit3f82a8d7434d3c673e4fd8a06e42f653f2c7676c (patch)
treefd85410c611dd1524bdd6e57e3b3fd70acf13de0
parent581c9da100fe6595fc8f0b9c64772faf6a50145f (diff)
downloaddrakx-3f82a8d7434d3c673e4fd8a06e42f653f2c7676c.tar
drakx-3f82a8d7434d3c673e4fd8a06e42f653f2c7676c.tar.gz
drakx-3f82a8d7434d3c673e4fd8a06e42f653f2c7676c.tar.bz2
drakx-3f82a8d7434d3c673e4fd8a06e42f653f2c7676c.tar.xz
drakx-3f82a8d7434d3c673e4fd8a06e42f653f2c7676c.zip
perl_checker compliance
-rw-r--r--perl-install/standalone.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone.pm b/perl-install/standalone.pm
index e4f3480d4..5c5162d20 100644
--- a/perl-install/standalone.pm
+++ b/perl-install/standalone.pm
@@ -258,7 +258,7 @@ sub are_installed {
sub remove {
my ($o, @l) = @_;
- my $wait = $o->{in}->wait_message('', N("Removing packages..."));
+ my $_wait = $o->{in}->wait_message('', N("Removing packages..."));
$o->{in}->suspend;
log::explanations("removed packages @l");
my $ret = system('rpm', '-e', @l) == 0;