From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <zsh-workers-return-11396-mason-zsh=primenet.com.au@sunsite.auc.dk>
Received: (qmail 4458 invoked from network); 16 May 2000 00:50:05 -0000
Received: from sunsite.auc.dk (130.225.51.30)
  by ns1.primenet.com.au with SMTP; 16 May 2000 00:50:05 -0000
Received: (qmail 6711 invoked by alias); 16 May 2000 00:50:00 -0000
Mailing-List: contact zsh-workers-help@sunsite.auc.dk; run by ezmlm
Precedence: bulk
X-No-Archive: yes
X-Seq: 11396
Received: (qmail 6704 invoked from network); 16 May 2000 00:49:58 -0000
To: zsh-workers@sunsite.auc.dk
Subject: PATCH: _look refinement.
MIME-Version: 1.0 (generated by SEMI 1.13.7 - "Awazu")
Content-Type: text/plain; charset=US-ASCII
From: Tanaka Akira <akr@m17n.org>
Date: 16 May 2000 09:51:20 +0900
Message-ID: <hvo7lcvpbav.fsf@serein.m17n.org>
User-Agent: T-gnus/6.14.1 (based on Gnus v5.8.3) (revision 16) SEMI/1.13.7 (Awazu) FLIM/1.13.2 (Kasanui) Emacs/20.6 (i686-pc-linux-gnu) MULE/4.0 (HANANOEN)

This refines _look.

* display message when an argument is empty.
* remove `-f'.

Index: Completion/User/_look
===================================================================
RCS file: /cvsroot/zsh/zsh/Completion/User/_look,v
retrieving revision 1.3
diff -u -r1.3 _look
--- Completion/User/_look	2000/05/05 14:48:04	1.3
+++ Completion/User/_look	2000/05/16 00:48:42
@@ -8,11 +8,14 @@
   '-f[case insensitive]' \
   '-d[dictionary order]' \
   ':string:->string' \
-  ':dictionary file:_files -f' && return 0
+  ':dictionary file:_files' && return 0
 
 case "$state" in
 string)
-  [[ -n "$PREFIX" ]] &&
-      _wanted values expl 'word prefix' compadd - $(_call values $words[1] $PREFIX)
+  if [[ -n "$PREFIX" ]]; then
+    _wanted values expl 'word prefix' compadd - $(_call values $words[1] $PREFIX)
+  else
+    _message 'word prefix'
+  fi
   ;;
 esac
-- 
Tanaka Akira