compinit pollutes fpath when MARK_DIRS set

[Clint Adams <clint@xxxxxxx>]

% print $#fpath
20
% setopt markdirs
% autoload -U compinit
% compinit
% print $#fpath
32

Index: Completion/compaudit
===================================================================
RCS file: /cvsroot/zsh/zsh/Completion/compaudit,v
retrieving revision 1.8
diff -u -r1.8 compaudit
--- Completion/compaudit	30 Mar 2004 16:38:04 -0000	1.8
+++ Completion/compaudit	23 Feb 2005 03:35:25 -0000
@@ -65,10 +65,10 @@
     _i_addfiles=()
     if [[ -d $_compdir/Base/Core ]]; then
       # Add all the Completion subdirectories (CVS-layout)
-      _i_addfiles=(${_compdir}/*/*(/))
+      _i_addfiles=(${_compdir}/*/*(/^M))
     elif [[ -d $_compdir/Base ]]; then
       # Likewise (installation-layout)
-      _i_addfiles=(${_compdir}/*(/))
+      _i_addfiles=(${_compdir}/*(/^M))
     fi
     for _i_line in {1..$#_i_addfiles}; do
       _i_file=${_i_addfiles[$_i_line]}