From 4425c028c3930779729541c070a6a90ce6c509b2 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Tue, 7 Jan 2014 14:48:47 +0100
Subject: perl_checker cleanups

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

diff --git a/control-center b/control-center
index 790c7910..8bcb7aaf 100755
--- a/control-center
+++ b/control-center
@@ -1221,7 +1221,7 @@ sub fork_ {
 sub real_bin_path {
     my ($prog) = @_;
     $prog = first(split /\s+/, $prog);
-    return $prog if $prog =~ /\//;
+    return $prog if $prog =~ m!/!;
     return "/usr/bin/$prog" if -x "/usr/bin/$prog";
     return "/usr/sbin/$prog";
 }
@@ -1496,7 +1496,7 @@ sub about_mga_cc() {
              0, Gtk2::Label->new(""),
              0, Gtk2::Label->new(
                  #-PO: here %s is eg: "1999-2008"
-                 N("Copyright (C) %s Mandriva SA", '1999-2008') . "\n" . N("Copyright (C) %s Mageia", '2011-2013') . "\n" ),
+                 N("Copyright (C) %s Mandriva SA", '1999-2008') . "\n" . N("Copyright (C) %s Mageia", '2011-2013') . "\n"),
              0, Gtk2::HSeparator->new,
              0, Gtk2::Label->new(""),
              1, my $n = Gtk2::Notebook->new,
-- 
cgit v1.2.1