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

[billclem]

Hi Tassilo,

Tassilo Horn <address@hidden> writes:

> address@hidden writes:
>> Where is the repository for anything-config.el? I found an emacs wiki
>> page - is that it?
>
> The page on emacswiki that lists all this is
>
>   http://www.emacswiki.org/cgi-bin/wiki/Anything

Ok, thanks.

>> Also, what is the best forum for posting mods to anything-config.el?
>
> You can poste additions on that wiki page. If you want to modify
> existing code, please clone the git repository and send me a patch or
> the url of your repository, so that I can pull your changes.
>
>> Isn't gnu.emacs.sources just supposed to be for source posting and not
>> discussions?
>
> Hm, I don't know. Maybe comp.emacs would be more appropriate, or
> gnu.emacs.help? (Does anything work on XEmacs?)

Whatever.

>> I've added a Mac-specific action to my anything-actions-file:
>> ("Open File with default Tool" . (lambda (filename)
>>                                   (call-process "/usr/bin/open" nil 0
>> nil filename)))
>
> As open is not the default tool on all platforms, I thinkt the current
> behavior of `anything-actions-file' is better. But you can
>
>   (setq anything-external-commands-list '("open"))
>
> so that you save some processing time and only get "open" as completion
> possibility when you choose
>
>   "Open File with external Tool".

Hmm, that requires 2 more keystrokes than my command, so I think I'll
just keep it in my .emacs file as I use that action quite a
lot. Incidentally, I wrote a little helper macro that adds new actions
to the existing ones (I find the "standard" actions quite useful, so I
don't want to do a reassignment that just replicates what's already in
anything-config.el and I also I didn't want to have to clone the
variable assignment every time a new version of anything-config.el
came out with additional actions). You might want to add it to
anything-config.el if you think others might also find it useful:

(defmacro anything-add-to-actions (var field action)
  `(setq ,var (cons ',field
                    (append
                     (cdr ,var)
                     (list ',action)))))

To add the two actions I sent in earlier, one would do the following:

(anything-add-to-actions anything-actions-file
                         file
                         ("Open File with default Tool" .
                           (lambda (filename)
                             (call-process "/usr/bin/open" nil 0 nil 
filename))))

(anything-add-to-actions anything-actions-function
                         function
                         ("Find Function" .
                          (lambda (command-name)
                            (find-function (intern command-name)))))

>> And, an action to find the source of an emacs function to the
>> anything-actions-function file:
>> ("Find Function" . (lambda (command-name)
>>                     (find-function (intern command-name))))
>
> Yes, why not? Of course fou could choose "Describe Function" and then
> hit RET on the link...

Yes, but that's more keystrokes than I want to use. ;-)

> But I'll add it.

Ok, thanks.

--
Bill Clementson