[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Anything.el for Windows
From: |
Sébastien Vauban |
Subject: |
Re: Anything.el for Windows |
Date: |
Thu, 14 Feb 2008 14:08:56 +0100 |
User-agent: |
Gnus/5.110007 (No Gnus v0.7) Emacs/23.0.60 (gnu/linux) |
Hi Tassilo,
>>> Anyway, please paste your anything-sources, so that I can
>>> check if I can reproduce the bug here.
>>
>> Value:
>> (((name . "Locate")
>> (candidates lambda nil
>> (apply 'start-process "locate-process" nil
>> (append anything-c-locate-options
>> (list anything-pattern))))
>> (type . file)
>> (requires-pattern . 3)
>> (delayed))
>
> [...]
>
>> ((name . "Info Pages")
>> (candidates lambda nil
>> (if anything-c-info-pages anything-c-info-pages
>> (setq anything-c-info-pages
>> (save-window-excursion
>> (save-excursion
>> (require 'info)
>> (Info-find-node "dir" "top")
>> (goto-char
>> (point-min))
>> (let
>> ((info-topic-regexp "\\* +\\([^:]+:
>> ([^)]+)[^.]*\\)\\.")
>> topics)
>> (while
>> (re-search-forward info-topic-regexp nil t)
>> (add-to-list 'topics
>> (match-string-no-properties 1)))
>> (goto-char
>> (point-min))
>> (Info-exit)
>> topics)))))) ;; <-- [1]
>> (action
>> ("Show with Info" lambda
>> (node-str)
>> (info
>> (replace-regexp-in-string "^[^:]+: " "" node-str))))
>> (requires-pattern . 2)))
>
> Hah! There's the bug! The "Info Pages" source ends at [1], the
> following action section and the requires-pattern stand alone.
> Is it possible that you use an outdated version of
> anything-config.el?
Not really. Here are the differences between my original
anything-sources.el and the latest one on [2].
--8<---------------cut here---------------start------------->8---
341c341
< (type . bookmark))
---
> (action . (("Jump to Bookmark" . bookmark-jump))))
811c811
< "Replaces /home/user with ~."
---
> "Replaces /home/user with $HOME."
812a813
> ;; replace path of HOME directory in paths with the string <home>
816c817
< (cons (replace-match "~" nil nil file) file)
---
> (cons (replace-match "$HOME" nil nil file) file)
1074,1076c1075
<
'(anything-c-transform-sexp-eval-command-sexp)))))
< (bookmark (action ("Jump to bookmark" . bookmark-jump)
< ("Delete bookmark" . bookmark-delete)))))
---
>
> '(anything-c-transform-sexp-eval-command-sexp)))))))
--8<---------------cut here---------------end--------------->8---
>From what I understand, nothing that would explain my problem?
> Please get the current one from my git repository [1] or from
> emacswiki [2].
> __________
> [1] git clone http://www.tsdh.de/repos/git/anything-config.git/
> [2] http://www.emacswiki.org/cgi-bin/wiki/anything-config.el
I've git'ted your file as well (2nd try), but my problem still
stays!?
FYI, here's my `anything-sources' with the latest "sources"
file:
--8<---------------cut here---------------start------------->8---
Value:
(((name . "Locate")
(candidates lambda nil
(apply 'start-process "locate-process" nil
(append anything-c-locate-options
(list anything-pattern))))
(type . file)
(requires-pattern . 3)
(delayed))
((name . "Tracker Search")
(candidates lambda nil
(start-process "tracker-search-process" nil "tracker-search"
anything-pattern))
(type . file)
(requires-pattern . 3)
(delayed))
((name . "Bookmarks")
(init lambda nil
(require 'bookmark))
(candidates . bookmark-all-names)
(type . bookmark))
((name . "File Name History")
(candidates . file-name-history)
(match anything-c-match-on-file-name anything-c-match-on-directory-name)
(type . file))
((name . "Buffers")
(candidates . anything-c-buffer-list)
(volatile)
(type . buffer))
((name . "Manual Pages")
(candidates lambda nil
(if anything-c-man-pages anything-c-man-pages
(setq anything-c-man-pages
(condition-case nil
(progn
(require 'woman)
(woman-file-name "")
(sort
(mapcar 'car woman-topic-all-completions)
'string-lessp))
(error nil)))))
(action
("Show with Woman" . woman))
(requires-pattern . 2))
((name . "Info Pages")
(candidates lambda nil
(if anything-c-info-pages anything-c-info-pages
(setq anything-c-info-pages
(save-window-excursion
(save-excursion
(require 'info)
(Info-find-node "dir" "top")
(goto-char
(point-min))
(let
((info-topic-regexp "\\* +\\([^:]+:
([^)]+)[^.]*\\)\\.")
topics)
(while
(re-search-forward info-topic-regexp nil t)
(add-to-list 'topics
(match-string-no-properties 1)))
(goto-char
(point-min))
(Info-exit)
topics))))))
(action
("Show with Info" lambda
(node-str)
(info
(replace-regexp-in-string "^[^:]+: " "" node-str))))
(requires-pattern . 2)))
--8<---------------cut here---------------end--------------->8---
The problem seems to stay, even with the updated versions of
both `anything.el' and `anything-sources.el'.
Can you help me?
Best regards,
Seb
--
Sébastien Vauban
- Re: Anything.el for Windows, (continued)
- Message not available
- Re: Anything.el for Windows, Sébastien Vauban, 2008/02/05
- Re: Anything.el for Windows, Tassilo Horn, 2008/02/05
- Message not available
- Re: Anything.el for Windows, Sébastien Vauban, 2008/02/06
- Re: Anything.el for Windows, Tassilo Horn, 2008/02/06
- Message not available
- Re: Anything.el for Windows, Sébastien Vauban, 2008/02/11
- Re: Anything.el for Windows, Tassilo Horn, 2008/02/11
- Message not available
- Re: Anything.el for Windows, Sébastien Vauban, 2008/02/12
- Re: Anything.el for Windows, Tassilo Horn, 2008/02/12
- Message not available
- Re: Anything.el for Windows, Sébastien Vauban, 2008/02/12
- Re: Anything.el for Windows, Tassilo Horn, 2008/02/13
- Message not available
- Re: Anything.el for Windows,
Sébastien Vauban <=
- Re: Anything.el for Windows, Tassilo Horn, 2008/02/14
- Message not available
- Re: Anything.el for Windows, Sébastien Vauban, 2008/02/14
- Re: Anything.el for Windows, Tassilo Horn, 2008/02/14
- Message not available
- Re: Anything.el for Windows, Sébastien Vauban, 2008/02/15
- Re: Anything.el for Windows, Tassilo Horn, 2008/02/15
- Message not available
- Re: Anything.el for Windows, Sébastien Vauban, 2008/02/15
- Re: Anything.el for Windows, Tassilo Horn, 2008/02/15
- Message not available
- Re: Anything.el for Windows, Sébastien Vauban, 2008/02/18
- Re: Anything.el for Windows, Tassilo Horn, 2008/02/18
- Message not available
- Re: Anything.el for Windows, Sébastien Vauban, 2008/02/18