summaryrefslogtreecommitdiffstats
path: root/MDK
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2006-09-04 12:25:43 +0000
committerPascal Rigaux <pixel@mandriva.com>2006-09-04 12:25:43 +0000
commitb43cff12c0012bef87075ceb9090d4e83fbaf5de (patch)
tree97fcb647086802536fc39d09d80b2b341711687a /MDK
parent6908e78dc4afe828dd2f154fb886648c53e0f254 (diff)
downloadperl-MDK-Common-b43cff12c0012bef87075ceb9090d4e83fbaf5de.tar
perl-MDK-Common-b43cff12c0012bef87075ceb9090d4e83fbaf5de.tar.gz
perl-MDK-Common-b43cff12c0012bef87075ceb9090d4e83fbaf5de.tar.bz2
perl-MDK-Common-b43cff12c0012bef87075ceb9090d4e83fbaf5de.tar.xz
perl-MDK-Common-b43cff12c0012bef87075ceb9090d4e83fbaf5de.zip
setVarsInSh: fix writing "|" in sh config files
Diffstat (limited to 'MDK')
-rw-r--r--MDK/Common.pm.pl2
-rw-r--r--MDK/Common/System.pm2
2 files changed, 2 insertions, 2 deletions
diff --git a/MDK/Common.pm.pl b/MDK/Common.pm.pl
index bf785cc..2a4e5ea 100644
--- a/MDK/Common.pm.pl
+++ b/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.2";
+our $VERSION = "1.2.3";
1;
EOF
diff --git a/MDK/Common/System.pm b/MDK/Common/System.pm
index 0f77d98..a947523 100644
--- a/MDK/Common/System.pm
+++ b/MDK/Common/System.pm
@@ -376,7 +376,7 @@ sub setVarsInShMode {
if ($val =~ /["`\$]/) {
$val =~ s/(')/\\$1/g;
$val = qq('$val');
- } elsif ($val =~ /['\s\\]/) {
+ } elsif ($val =~ /['|\s\\]/) {
$val =~ s/(["\\])/\\$1/g;
$val = qq("$val");
}