From d1d6e6ab96dfef047379e9adb370054080e8fdba Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Fri, 16 Oct 2009 14:07:43 +0000
Subject: perl_checker cleanups

---
 rpmdrake | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'rpmdrake')

diff --git a/rpmdrake b/rpmdrake
index a21315ec..8647609d 100755
--- a/rpmdrake
+++ b/rpmdrake
@@ -78,7 +78,7 @@ sub do_search($$$$$$$) {
             if ($NVR_searches->[0]) {
                 next if !/$entry_rx/;
             } else {
-                next if first(split_fullname($_)) !~ /$entry_rx/
+                next if first(split_fullname($_)) !~ /$entry_rx/;
             }
             push @search_results, $_;
             # FIXME: should be done for all research types
@@ -767,7 +767,7 @@ sub run_treeview_dialog {
 
 
 if (my $pid = is_running('rpmdrake')) {
-    interactive_msg(N("Warning"), N("rpmdrake is already running (pid: $pid)"., yesno => [ N("Quit") ]);
+    interactive_msg(N("Warning"), N("rpmdrake is already running (pid: %s)", $pid), yesno => [ N("Quit") ]);
     exit(0);
 }
 
-- 
cgit v1.2.1