1
0
Fork 0
mirror of git://git.code.sf.net/p/zsh/code synced 2025-09-03 10:21:46 +02:00

14538: cleaner _perl_config_vars from Matt Zimmerman

This commit is contained in:
Clint Adams 2001-05-29 14:35:52 +00:00
parent 99ed055497
commit 84c856aa00
2 changed files with 3 additions and 4 deletions

View file

@ -1,5 +1,7 @@
2001-05-29 Clint Adams <clint@zsh.org>
* 14538: cleaner _perl_config_vars from Matt Zimmerman.
* 14536: Completion/Debian/Command/_update-alternatives:
loop for multiple --slaves thanks to Sven.

View file

@ -46,10 +46,7 @@ _perl_m_opt () {
_perl_config_vars () {
if (( ! $+_perl_config_vars )); then
# perl | perl ... nasty, but is there another way?
_perl_config_vars=( $(perl -V |
perl -ne 'push @m, (/(\w+)(?==)/g);' \
-e 'END {print join "\n", @m}' ) )
_perl_config_vars=( $(perl -MConfig -e 'print join("\n", keys %Config);') )
fi
local add_colon='-P:'