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:
parent
99ed055497
commit
84c856aa00
2 changed files with 3 additions and 4 deletions
|
@ -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.
|
||||
|
||||
|
|
|
@ -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:'
|
||||
|
|
Loading…
Reference in a new issue