summaryrefslogtreecommitdiffstats
path: root/lib/MDK/Common/System.pm
diff options
context:
space:
mode:
authorPascal Terjan <pterjan@mandriva.org>2009-01-26 09:50:06 +0000
committerPascal Terjan <pterjan@mandriva.org>2009-01-26 09:50:06 +0000
commit7cb27275b7c6316bdc9b58fd98e3a55999f1094c (patch)
tree841a2bb94a53c77503f55f5894482cb968fc34e0 /lib/MDK/Common/System.pm
parent31e639b9a1e67674c5090ba9afd887cf76d7558c (diff)
downloadperl-MDK-Common-7cb27275b7c6316bdc9b58fd98e3a55999f1094c.tar
perl-MDK-Common-7cb27275b7c6316bdc9b58fd98e3a55999f1094c.tar.gz
perl-MDK-Common-7cb27275b7c6316bdc9b58fd98e3a55999f1094c.tar.bz2
perl-MDK-Common-7cb27275b7c6316bdc9b58fd98e3a55999f1094c.tar.xz
perl-MDK-Common-7cb27275b7c6316bdc9b58fd98e3a55999f1094c.zip
protect parenthesis in setVarsInSh and drop dead code (#47298)
Diffstat (limited to 'lib/MDK/Common/System.pm')
-rw-r--r--lib/MDK/Common/System.pm3
1 files changed, 1 insertions, 2 deletions
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";