On Tuesday, June 24, 2003 at 13:38:13, Uwe Brauer wrote:
> Hello
>
> I am using bbdb in combination with vm, and have an additional entry
> of the form vm-folder, so my bbdb entries look like:
> say:
>
> Robert Fenk
> net: [EMAIL PROTECTED]
> mail-alias: robertf
> vm-folder: NOTEBOOKS/Emacs/rfenk.notebook
>
> Now it would be extremely nifty, if I click on the vm-folder entry
> and (X)emacs would jump to the relevant entry.
I just made a commit allowing `bbdb-user-menu-commands' to
point to a function (this variable has been there for quite
some time, but I am not sure if anyone actually ever used
it). With this you could so something like the following:
(setq bbdb-user-menu-commands 'uwes-bbdb-menu)
(defun uwes-bbdb-menu (record field)
(let (folder)
(if (and (consp (bbdb-record-raw-notes record))
(setq folder (assq 'vm-folder (bbdb-record-raw-notes record)))
(setq folder (cdr folder)))
(list
(vector (format "Visit VM folder: %s" folder)
(list 'vm-visit-folder folder)
t)))))
Bye Robert
-------------------------------------------------------
This SF.Net email is sponsored by: INetU
Attention Web Developers & Consultants: Become An INetU Hosting Partner.
Refer Dedicated Servers. We Manage Them. You Get 10% Monthly Commission!
INetU Dedicated Managed Hosting http://www.inetu.net/partner/index.php
_______________________________________________
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/bbdb-info
BBDB Home Page: http://bbdb.sourceforge.net/
