diff options
| author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-01-07 14:48:47 +0100 |
|---|---|---|
| committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-01-07 14:48:51 +0100 |
| commit | 4425c028c3930779729541c070a6a90ce6c509b2 (patch) | |
| tree | f2cffd421a0ed72b1ad80597ac99295efa955066 | |
| parent | fc703a908eccbde15b0ed16557e06b6849d356c0 (diff) | |
| download | control-center-4425c028c3930779729541c070a6a90ce6c509b2.tar control-center-4425c028c3930779729541c070a6a90ce6c509b2.tar.gz control-center-4425c028c3930779729541c070a6a90ce6c509b2.tar.bz2 control-center-4425c028c3930779729541c070a6a90ce6c509b2.tar.xz control-center-4425c028c3930779729541c070a6a90ce6c509b2.zip | |
perl_checker cleanups
| -rwxr-xr-x | control-center | 4 |
1 files 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, |