about summary refs log tree commit diff
path: root/Completion/Unix/Command/_perl
diff options
context:
space:
mode:
authorOliver Kiddle <opk@users.sourceforge.net>2004-01-21 13:53:28 +0000
committerOliver Kiddle <opk@users.sourceforge.net>2004-01-21 13:53:28 +0000
commit63b336243fdf5e60058472fa456ed11e75280189 (patch)
treef101df4260c4cef5d32c63456ca98e23d6b54449 /Completion/Unix/Command/_perl
parent1b530bf152e1ca8c9c135c58a4753899d68db8e4 (diff)
downloadzsh-63b336243fdf5e60058472fa456ed11e75280189.tar.gz
zsh-63b336243fdf5e60058472fa456ed11e75280189.tar.xz
zsh-63b336243fdf5e60058472fa456ed11e75280189.zip
19387: add (-.) glob qualifier to globs where only files are directly applicable
Diffstat (limited to 'Completion/Unix/Command/_perl')
-rw-r--r--Completion/Unix/Command/_perl2
1 files changed, 1 insertions, 1 deletions
diff --git a/Completion/Unix/Command/_perl b/Completion/Unix/Command/_perl
index 0229f3e73..9d07b562d 100644
--- a/Completion/Unix/Command/_perl
+++ b/Completion/Unix/Command/_perl
@@ -31,7 +31,7 @@ _perl () {
     "-V-[print perl configuration information]:configuration keys:_perl_config_vars" \
     '-w[TURN WARNINGS ON FOR COMPILATION OF YOUR SCRIPT. Recommended.]' \
     '-x-[strip off text before #!perl line and perhaps cd to directory]:directory to cd to:_files -/' \
-    '1:Perl script:_files -/ -g \*.\(p\[ml\]\|PL\)' \
+    '1:Perl script:_files -/ -g "*.(p[ml]|PL)(-.)"' \
     '*::args: _normal' 
 }