From d1f0db42c00b6da04213a486c43fd01874fb6884 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Wed, 28 Mar 2012 18:42:28 +0000
Subject: silent perl_checker

---
 Rpmdrake/pkg.pm | 6 +++---
 rpmdrake.pm     | 2 +-
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm
index 4182dfa1..5f222cdc 100644
--- a/Rpmdrake/pkg.pm
+++ b/Rpmdrake/pkg.pm
@@ -915,9 +915,9 @@ you may now inspect some in order to take actions:"),
         exit(0);
     }
 
-    N("RPM transaction %d/%d");
-    N("Unselect all");
-    N("Details");
+    my $_s1 = N("RPM transaction %d/%d", 0, 0);
+    my $_s2 = N("Unselect all");
+    my $_s3 = N("Details");
 
     statusbar_msg_remove($statusbar_msg_id); #- XXX maybe remove this
 
diff --git a/rpmdrake.pm b/rpmdrake.pm
index 837e4c8f..bcea0740 100644
--- a/rpmdrake.pm
+++ b/rpmdrake.pm
@@ -975,7 +975,7 @@ sub open_help {
     my ($mode) = @_;
     use run_program;
     run_program::raw({ detach => 1, as_user => 1 },  'drakhelp', '--id', $mode ?  "software-management-$mode" : 'software-management');
-    N("Help launched in background");
+    my $_s = N("Help launched in background");
     statusbar_msg(N("The help window has been started, it should appear shortly on your desktop."), 1);
 }
 
-- 
cgit v1.2.1