From b9b8fa11803fe203bec381ff97eecd505b980bd0 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Thu, 21 Mar 2013 07:27:58 +0000
Subject: perl_checker cleanup

---
 Rpmdrake/pkg.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm
index 44dc2aed..960ef841 100644
--- a/Rpmdrake/pkg.pm
+++ b/Rpmdrake/pkg.pm
@@ -926,7 +926,7 @@ sub perform_removal {
     my ($urpm, $pkgs) = @_;
     my @toremove = map { if_($pkgs->{$_}{selected}, $pkgs->{$_}{urpm_name}) } keys %$pkgs;
     return if !@toremove;
-    my $gurpm =gurpm::RPMProgressDialog->new($urpm);
+    my $gurpm = gurpm::RPMProgressDialog->new($urpm);
     $gurpm->label(1 ? N("Please wait") : N("Please wait, removing packages..."));
     $gurpm->init_progressbar;
     my $_gurpm_clean_guard = before_leaving { undef $gurpm };
-- 
cgit v1.2.1