gnu-emacs-sources
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: ;;; anything.el --- open anything


From: address@hidden
Subject: Re: ;;; anything.el --- open anything
Date: Fri, 10 Aug 2007 04:06:40 -0700
User-agent: G2/1.0

It's not really readable, so here's the second attempt:

(setq anything-sources
      `(((name . "Notes")
         (candidates ,(list "Add new note"))
         (match (lambda (candidate)
                  t))
         (action . (("Add Input to Notes" .
                     (lambda (dummy)
                       (with-current-buffer
                           (find-file-noselect "~/.notes.txt")
                         (goto-char (point-max))
                         (insert anything-pattern "\n")
                         (save-buffer))))))
         (requires-pattern))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]