Re: Latest CVS: configure --pre=/to does not work

[Sven Wischnowsky <wischnow@xxxxxxxxxxxxxxxxxxxxxxx>]

Andrej Borsenkow wrote:

> Just after CVS update about 15 min before ... (18:00 Moscow time - GMT+3)
> 
> Why every completion update breakes something ... :-)

Because it *is* quite complicated, so much so that I can't tests
everything.

Sorry.

> bor@itsrm2:~/zsh%> zsh -f
> itsrm2% autoload -U compinit; compinit -D 
> itsrm2% ./configure --pre=/to<TAB> 
> itsrm2% ./configure --pre=/toopt=''
> <== Cursor here

The `opt=...' is the output of a `local' that got a parameter that ws
already made local by a previous `local'.

The missing completions were caused by a wrong test in `_arguments'
(and a missing `%%:*').

The patch also ensures that even if multiple calls to `comptry' add
the same tag, this tag will be used in only the first of theses
tags. For the functions we currently have, this is the right thing
(otherwise we might execute code more than once where the first
execution showed that it's useless to try this again). However, one
might argue that under certain circumstances it would be nice to allow 
tags to be in more than one set (if tags were used slightly different
from the way they are used now). If we ever find a case where this is
useful, I'll add an option to either `_tags' or `comptry' to allow
that.


This patch also fixes this for me:

Tanaka Akira wrote:

> Z:akr@is27e1u11% Src/zsh -f
> is27e1u11% bindkey -e; fpath=($PWD/Completion/*(/)); autoload -U compinit; compinit -D; compdef _tst tst
> is27e1u11% cvs <TAB>
> CVS/           Src/           commit        init          rtag
> Completion/    StartupFiles/  diff          log           status
> Config/        Util/          edit          login         tag
> Doc/           add           editors       logout        unedit
> Etc/           admin         export        rdiff         update
> Functions/     annotate      history       release       watch
> Misc/          checkout      import        remove        watchers
> 
> Wow. filenames shouldn't listed.
> 
> And after second <TAB>:
> 
> is27e1u11% cvs --allow-root=CVS/
> 
> Of cause, the option `--allow-root' shouldn't completed.

That was caused by the wrong test, too.

Bye
 Sven

diff -u oldcompletion/Base/_arguments Completion/Base/_arguments
--- oldcompletion/Base/_arguments	Fri Nov 19 09:55:53 1999
+++ Completion/Base/_arguments	Mon Nov 22 10:16:47 1999
@@ -24,7 +24,7 @@
   name="${name//[^a-zA-Z0-9_]/_}"
 
   if (( ! ${(P)+name} )); then
-    local iopts sopts pattern tmpo cur opt cache
+    local iopts sopts pattern tmpo cur cache
     typeset -U lopts
 
     cache=()
@@ -287,8 +287,7 @@
         fi
       fi
       if [[ -n "$opts" && -z "$aret$matched" &&
-            nm -ne compstate[nmatches] ]] &&
-          _requested arguments; then
+            nm -eq compstate[nmatches] ]]; then
 
         local prefix suffix
 
@@ -303,8 +302,10 @@
 	  SUFFIX="$suffix"
 	  IPREFIX="${IPREFIX}${equal[1]%%:*}="
 	  matched=yes
-	  comparguments -L "$equal[1]" descr action subc
+
+	  comparguments -L "${equal[1]%%:*}" descr action subc
 	  curcontext="${oldcontext}:$subc"
+
 	  continue
         fi
       fi
diff -u oldsrc/Zle/computil.c Src/Zle/computil.c
--- oldsrc/Zle/computil.c	Tue Nov 16 10:07:52 1999
+++ Src/Zle/computil.c	Mon Nov 22 10:19:24 1999
@@ -2730,8 +2730,16 @@
 	args = arrdup(args);
 
 	for (p = q = args, all = comptags[lasttaglevel]->all; *p; p++)
-	    if (arrcontains(all, *p))
-		*q++ = *p;
+	    if (arrcontains(all, *p)) {
+		Ctset s;
+
+		for (s = comptags[lasttaglevel]->sets; s; s = s->next)
+		    if (arrcontains(s->tags, *p))
+			break;
+
+		if (!s)
+		    *q++ = *p;
+	    }
 	*q = NULL;
 
 	if (*args) {

--
Sven Wischnowsky                         wischnow@xxxxxxxxxxxxxxxxxxxxxxx