From 7cb27275b7c6316bdc9b58fd98e3a55999f1094c Mon Sep 17 00:00:00 2001
From: Pascal Terjan <pterjan@mandriva.org>
Date: Mon, 26 Jan 2009 09:50:06 +0000
Subject: protect parenthesis in setVarsInSh and drop dead code (#47298)

---
 lib/MDK/Common.pm.pl     | 2 +-
 lib/MDK/Common/System.pm | 3 +--
 2 files changed, 2 insertions(+), 3 deletions(-)

(limited to 'lib')

diff --git a/lib/MDK/Common.pm.pl b/lib/MDK/Common.pm.pl
index 3581430..6c54e4e 100644
--- a/lib/MDK/Common.pm.pl
+++ b/lib/MDK/Common.pm.pl
@@ -73,7 +73,7 @@ our @ISA = qw(Exporter);
 # perl_checker: RE-EXPORT-ALL
 our @EXPORT = map { @$_ } map { values %{'MDK::Common::' . $_ . 'EXPORT_TAGS'} } grep { /::$/ } keys %MDK::Common::;
 
-our $VERSION = "1.2.14";
+our $VERSION = "1.2.15";
 
 1;
 EOF
diff --git a/lib/MDK/Common/System.pm b/lib/MDK/Common/System.pm
index b4f43c8..71b9bad 100644
--- a/lib/MDK/Common/System.pm
+++ b/lib/MDK/Common/System.pm
@@ -377,8 +377,7 @@ sub setVarsInShMode {
 	    if ($val =~ /["`\$]/) {
 		$val =~ s/(')/\\$1/g;
 		$val = qq('$val');
-	    } elsif ($val =~ /['|\s\\]/) {
-		$val =~ s/(["\\])/\\$1/g;
+	    } elsif ($val =~ /[\(\)'|\s\\]/) {
 		$val = qq("$val");
 	    }
 	    "$_=$val\n";
-- 
cgit v1.2.1