From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Tassilo Horn Newsgroups: gmane.emacs.help Subject: Re: Anything.el for Windows Date: Mon, 18 Feb 2008 18:07:22 +0100 Message-ID: <87hcg6kxbp.fsf@member.fsf.org> References: <87ve55gc7n.fsf@mundaneum.com> <874pcfjz2x.fsf@mundaneum.com> <87myq6iftr.fsf@mundaneum.com> <87odamcg3i.fsf@mundaneum.com> <87y79n65xz.fsf@mundaneum.com> <87r6ff4ngk.fsf@mundaneum.com> <873arumoua.fsf@mundaneum.com> <87myq2l4w5.fsf@mundaneum.com> <87skzqfvtt.fsf@mundaneum.com> <874pc6e3ne.fsf@mundaneum.com> <87y79icl8l.fsf@mundaneum.com> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: 8bit X-Trace: ger.gmane.org 1203354768 17119 80.91.229.12 (18 Feb 2008 17:12:48 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Mon, 18 Feb 2008 17:12:48 +0000 (UTC) To: help-gnu-emacs@gnu.org Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Mon Feb 18 18:13:11 2008 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1JR9Y4-0003Ni-Nr for geh-help-gnu-emacs@m.gmane.org; Mon, 18 Feb 2008 18:13:01 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1JR9Xa-0003Y2-2M for geh-help-gnu-emacs@m.gmane.org; Mon, 18 Feb 2008 12:12:30 -0500 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1JR9Sr-0007xB-Br for help-gnu-emacs@gnu.org; Mon, 18 Feb 2008 12:07:37 -0500 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1JR9So-0007v8-IA for help-gnu-emacs@gnu.org; Mon, 18 Feb 2008 12:07:36 -0500 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1JR9So-0007uu-BM for help-gnu-emacs@gnu.org; Mon, 18 Feb 2008 12:07:34 -0500 Original-Received: from main.gmane.org ([80.91.229.2] helo=ciao.gmane.org) by monty-python.gnu.org with esmtps (TLS-1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1JR9Sn-0006zZ-Tu for help-gnu-emacs@gnu.org; Mon, 18 Feb 2008 12:07:34 -0500 Original-Received: from list by ciao.gmane.org with local (Exim 4.43) id 1JR9Sk-0003MJ-K5 for help-gnu-emacs@gnu.org; Mon, 18 Feb 2008 17:07:30 +0000 Original-Received: from dslb-084-063-019-045.pools.arcor-ip.net ([84.63.19.45]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 18 Feb 2008 17:07:30 +0000 Original-Received: from tassilo by dslb-084-063-019-045.pools.arcor-ip.net with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 18 Feb 2008 17:07:30 +0000 X-Injected-Via-Gmane: http://gmane.org/ Original-Lines: 75 Original-X-Complaints-To: usenet@ger.gmane.org X-Gmane-NNTP-Posting-Host: dslb-084-063-019-045.pools.arcor-ip.net User-Agent: Gnus/5.110007 (No Gnus v0.7) Emacs/23.0.60 (gnu/linux) Cancel-Lock: sha1:u5MWv2tqvtn536NzkSRuxx6FSwA= X-detected-kernel: by monty-python.gnu.org: Linux 2.6, seldom 2.4 (older, 4) X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.help:51647 Archived-At: Sébastien Vauban writes: Hi Sébastien, >> Ok, I looked into anything.el and maybe I found the culprit. >> What does >> >> (sit-for anything-idle-delay) >> >> return on your system? If it returns nil, then that's the >> problem. > > ... it does return `t'. Ok, then eval this: --8<---------------cut here---------------start------------->8--- (defun anything-update () "Update the list of matches in the anything buffer according to the current pattern." (setq anything-digit-shortcut-count 0) (anything-kill-async-processes) (with-current-buffer anything-buffer (erase-buffer) (if anything-enable-digit-shortcuts (dolist (overlay anything-digit-overlays) (delete-overlay overlay))) (let (delayed-sources) (dolist (source (anything-get-sources)) (if (or (not anything-source-filter) (member (assoc-default 'name source) anything-source-filter)) (if (equal anything-pattern "") (unless (assoc 'requires-pattern source) (if (assoc 'delayed source) (push source delayed-sources) (anything-process-source source))) (let ((min-pattern-length (assoc-default 'requires-pattern source))) (unless (and min-pattern-length (< (length anything-pattern) min-pattern-length)) (if (assoc 'delayed source) (push source delayed-sources) (anything-process-source source))))))) (message "delayed-sources = %s" (mapcar (lambda (s) (assoc 'name s)) delayed-sources)) (goto-char (point-min)) (run-hooks 'anything-update-hook) (anything-next-line) (anything-maybe-fit-frame) (run-with-idle-timer (if (featurep 'xemacs) 0.1 0) nil 'anything-process-delayed-sources delayed-sources)))) --8<---------------cut here---------------end--------------->8--- Now invoke anything and type some pattern. Then go to *Messages* and see if something like delayed-sources = ((name . Google Suggest) (name . Locate)) is there. Bye, Tassilo -- "Ubuntu" - an African word, meaning "Slackware is too hard for me".