diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2006-09-04 12:25:43 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2006-09-04 12:25:43 +0000 |
commit | b43cff12c0012bef87075ceb9090d4e83fbaf5de (patch) | |
tree | 97fcb647086802536fc39d09d80b2b341711687a /MDK/Common/System.pm | |
parent | 6908e78dc4afe828dd2f154fb886648c53e0f254 (diff) | |
download | perl-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/Common/System.pm')
-rw-r--r-- | MDK/Common/System.pm | 2 |
1 files changed, 1 insertions, 1 deletions
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"); } |