PATCH: RE: Q about zrecompile

[Sven Wischnowsky <wischnow@xxxxxxxxxxxxxxxxxxxxxxx>]

Andrej Borsenkow wrote:

> > > bor@itsrm2% zfrecomp
> > > re-compiling
> > > /tools/share/zsh/3.1.7-pre-1/functions/Base/_arg_compile.zwc: failed
> >
> > As it says... it can't compile `.../_arg_compile.zwc'. Because, going
> > by the name, it probably isn't a shell code file.
> >
> > Use a pattern that includes only the *functions* (or scripts)
> > you want
> > to put in the zwc file(s).
> >
> 
> I do NOT have _arg_compile.zwc at all. I do have only functions
> installed by default under /tools/share/zsh/$ZSH_VERSION/functions/

Everybody guessed that already, of course... it was all my fault.

I tried to make zrecompile smart, removing zwc files from the file
list it gets. So it was either too smart or too stupid.

I had tried it without a .zwc in the first argument. Completely
automatically, since the .zwc is automatically added.

Bye
 Sven

Index: Functions/Misc/zrecompile
===================================================================
RCS file: /cvsroot/zsh/zsh/Functions/Misc/zrecompile,v
retrieving revision 1.2
diff -u -r1.2 zrecompile
--- Functions/Misc/zrecompile	2000/04/01 20:49:47	1.2
+++ Functions/Misc/zrecompile	2000/04/20 12:41:24
@@ -66,13 +66,15 @@
       argv=()
     fi
 
-    files=( ${files:#*(.zwc|~)} )
     if [[ $files[1] = -[RM] ]]; then
       map=( $files[1] )
       shift 1 files
     else
       map=()
     fi
+    (( $#files )) || continue
+
+    files=( $files[1] ${files[2,-1]:#*(.zwc|~)} )
 
     (( $#files )) || continue
 

--
Sven Wischnowsky                         wischnow@xxxxxxxxxxxxxxxxxxxxxxx