diff options
author | Pascal Terjan <pterjan@mandriva.org> | 2009-02-02 10:29:51 +0000 |
---|---|---|
committer | Pascal Terjan <pterjan@mandriva.org> | 2009-02-02 10:29:51 +0000 |
commit | 3c47af81cc0fcd39a403feccb72e281ea87f1f24 (patch) | |
tree | fb2b372e2b03c6de75e81d749970d42d5763e91d /lib/MDK/Common | |
parent | 7cb27275b7c6316bdc9b58fd98e3a55999f1094c (diff) | |
download | perl-MDK-Common-3c47af81cc0fcd39a403feccb72e281ea87f1f24.tar perl-MDK-Common-3c47af81cc0fcd39a403feccb72e281ea87f1f24.tar.gz perl-MDK-Common-3c47af81cc0fcd39a403feccb72e281ea87f1f24.tar.bz2 perl-MDK-Common-3c47af81cc0fcd39a403feccb72e281ea87f1f24.tar.xz perl-MDK-Common-3c47af81cc0fcd39a403feccb72e281ea87f1f24.zip |
- protect ;<>&#[]~{}*? in setVarsInSh
Diffstat (limited to 'lib/MDK/Common')
-rw-r--r-- | lib/MDK/Common/System.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/MDK/Common/System.pm b/lib/MDK/Common/System.pm index 71b9bad..e3d514d 100644 --- a/lib/MDK/Common/System.pm +++ b/lib/MDK/Common/System.pm @@ -377,7 +377,7 @@ sub setVarsInShMode { if ($val =~ /["`\$]/) { $val =~ s/(')/\\$1/g; $val = qq('$val'); - } elsif ($val =~ /[\(\)'|\s\\]/) { + } elsif ($val =~ /[\(\)'|\s\\;<>&#\[\]~{}*?]/) { $val = qq("$val"); } "$_=$val\n"; |