perl_builting get /usr/share also in the completion

[Chmouel Boudjnah <chmouel@xxxxxxxxxxxxxxxx>]

* Completion/User/_perl_builtin_funcs: Get also /usr/share/man :

Index: Completion/User/_perl_builtin_funcs
===================================================================
RCS file: /cvsroot/zsh/zsh/Completion/User/_perl_builtin_funcs,v
retrieving revision 1.2
diff -u -r1.2 _perl_builtin_funcs
--- Completion/User/_perl_builtin_funcs 2000/05/31 09:38:26     1.2
+++ Completion/User/_perl_builtin_funcs 2000/07/19 23:30:42
@@ -12,7 +12,7 @@
   typeset -agU _perl_builtin_funcs
   local perlfunc
 
-  if [[ -n "${perlfunc:=$(man -w perlfunc 2>/dev/null; print -l ${^manpath}/man1/perlfunc.1(N) {/usr/man,/usr/local/man}/man1/perlfunc.1(N))}" ]]; then
+  if [[ -n "${perlfunc:=$(man -w perlfunc 2>/dev/null; print -l ${^manpath}/man1/perlfunc.1(N) {/usr/man,/usr/share/man,/usr/local/man}/man1/perlfunc.1(N))}" ]]; then
     _perl_builtin_funcs=( `perl -lne '
                              $in_funcs++, next if /Alphabetical/;     \
                              next unless $in_funcs;                   \


-- 
MandrakeSoft Inc                http://www.mandrakesoft.com
San-Francisco, CA USA                             --Chmouel