summaryrefslogtreecommitdiffstats
path: root/Completion/User/_perldoc
diff options
context:
space:
mode:
authorTanaka Akira <akr@users.sourceforge.net>1999-09-06 11:05:38 +0000
committerTanaka Akira <akr@users.sourceforge.net>1999-09-06 11:05:38 +0000
commit929c56748420b581088cd75443d21d7c06ac44d6 (patch)
treebd68094f0d44922a9b125ea4211c45267506e478 /Completion/User/_perldoc
parentzsh-workers/7656 (diff)
downloadzsh-929c56748420b581088cd75443d21d7c06ac44d6.tar
zsh-929c56748420b581088cd75443d21d7c06ac44d6.tar.gz
zsh-929c56748420b581088cd75443d21d7c06ac44d6.tar.bz2
zsh-929c56748420b581088cd75443d21d7c06ac44d6.tar.lz
zsh-929c56748420b581088cd75443d21d7c06ac44d6.tar.xz
zsh-929c56748420b581088cd75443d21d7c06ac44d6.tar.zst
zsh-929c56748420b581088cd75443d21d7c06ac44d6.zip
zsh-3.1.6-pws-3zsh-3.1.6-pws-3
Diffstat (limited to 'Completion/User/_perldoc')
-rw-r--r--Completion/User/_perldoc2
1 files changed, 1 insertions, 1 deletions
diff --git a/Completion/User/_perldoc b/Completion/User/_perldoc
index cd5383a45..d15650448 100644
--- a/Completion/User/_perldoc
+++ b/Completion/User/_perldoc
@@ -15,9 +15,9 @@ if [[ $CURRENT -eq 3 && $words[2] == '-f' ]]; then
_perl_builtin_funcs
elif [[ $CURRENT -eq 3 && $words[2] == '-q' ]]; then
zle -R "I can't read your mind!"
+ return 1
else
_perl_modules
_perl_basepods
_path_files -/ -g '*.(pod|pm)'
fi
-