about summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--Completion/User/_perl_basepods32
1 files changed, 0 insertions, 32 deletions
diff --git a/Completion/User/_perl_basepods b/Completion/User/_perl_basepods
deleted file mode 100644
index 5c8034a96..000000000
--- a/Completion/User/_perl_basepods
+++ /dev/null
@@ -1,32 +0,0 @@
-#autoload
-#
-# _perl_basepods - zsh completion function
-#
-# Adam Spiers <adam@spiers.net>
-#
-# Calculate all installed Perl base pods (perlfunc, perlfaq etc.).
-# The result is cached for future use.
-#
-
-if [[ ${+_perl_basepods} -eq 0 ]]; then
-  typeset -agU _perl_basepods
-
-  if (( ${+commands[basepods]} )); then
-    _perl_basepods=( ${$(basepods):t:r} )
-  else
-    local podpath
-
-    podpath=$(perl -MConfig -e 'print "$Config{installprivlib}/pod"')
-
-    if [[ ! -e $podpath/perl.pod ]]; then
-      echo "Couldn't find perl.pod from Config.pm; giving up."
-      return 1
-    else
-      _perl_basepods=( ${podpath}/*.pod(:r:t) )
-    fi
-  fi
-fi
-
-local expl
-
-_wanted pods expl 'Perl base pods' compadd -a _perl_basepods