After applying the patch, and trying M-x org-store-link on your
messasge, I get the new error:
Debugger entered--Lisp error: (wrong-type-argument listp "Bastien")
car("Bastien")
(let* ((msgnum ...) (message-id ...) (wl-message-entity ...) (from
...) (to ...) (subject ...)) (org-store-link-props :type "wl" :from
from :to to :subject subject :message-id message-id) (setq message-id
(org-remove-angle-brackets message-id)) (setq cpltxt
(org-email-link-description)) (setq link (org-make-link "wl:"
wl-summary-buffer-folder-name "#" message-id)))
(cond ((run-hook-with-args-until-success ...) (setq link ... desc
...)) ((eq major-mode ...) (let ... ... ...)) ((eq major-mode ...)
(setq link ...) (setq cpltxt ...) (org-store-link-props :type "info"
:file Info-current-file :node Info-current-node)) ((eq major-mode ...)
(let ... ... ...)) ((or ... ...) (and ... ...)
(vm-follow-summary-cursor) (save-excursion ... ...)) ((eq major-mode
...) (let* ... ... ... ... ...)) ((or ... ...) (let ... ... ... ...))
((eq major-mode ...) (save-excursion ...)) ((eq major-mode ...) (let
... ... ... ...)) ((memq major-mode ...) (and ... ...) (let* ... ...
... ...)) ((eq major-mode ...) (setq cpltxt ... link ...)
(org-store-link-props :type "w3" :url ...)) ((eq major-mode ...) (setq
cpltxt ... link ...) (org-store-link-props :type "w3m" :url ...))
((setq search ...) (setq link ...) (setq cpltxt ...)) ((eq major-mode
...) (setq cpltxt ... link ...) (org-store-link-props :type "image"
:file buffer-file-name)) ((eq major-mode ...) (setq cpltxt ... link
...)) ((and buffer-file-name ...) (setq cpltxt ...) (when ... ...) (if
... ...) (setq link ...)) ((buffer-file-name ...) (setq cpltxt ...)
(when ... ... ...) (setq link ...)) ((interactive-p) (error "Cannot
link to a buffer which is not visiting a file")) (t (setq link nil)))
(let (link cpltxt desc description search txt) (cond (... ...) (...
...) (... ... ... ...) (... ...) (... ... ... ...) (... ...) (... ...)
(... ...) (... ...) (... ... ...) (... ... ...) (... ... ...) (... ...
...) (... ... ...) (... ...) (... ... ... ... ...) (... ... ... ...)
(... ...) (t ...)) (if (consp link) (setq cpltxt ... link ...)) (setq
link (or link cpltxt) desc (or desc cpltxt)) (if (equal desc "NONE")
(setq desc nil)) (if (and ... link) (progn ... ...) (and link ...)))
org-store-link(nil)
call-interactively(org-store-link t nil)
execute-extended-command(nil)
call-interactively(execute-extended-command nil nil)
On Dec 29, 2007 8:52 AM, Bastien <[EMAIL PROTECTED]> wrote:
>
> > When I try 'M-x org-store-link' in the wanderlust summary buffer, I
> > get an error (have tried with many messages). For example:
> >
> > Debugger entered--Lisp error: (error "Invalid address: (Brad Pitt
> > <[EMAIL PROTECTED]>)")
> > signal(error ("Invalid address: (Brad Pitt <[EMAIL PROTECTED]>)"))
> > error("Invalid address: %s" ("Brad Pitt <[EMAIL PROTECTED]>"))
> > mail-extract-address-components(("Brad Pitt <[EMAIL PROTECTED]>"))
> > org-store-link-props(:type "wl" :from "Jolie, Angelina" :to ("Brad
> > Pitt <[EMAIL PROTECTED]>") :subject "RE: u r hot" :message-id
> > "<[EMAIL PROTECTED]>")
> > org-store-link(nil)
> > call-interactively(org-store-link)
> > execute-extended-command(nil)
> > call-interactively(execute-extended-command)
> >
> > The address reported in the backtrace has, of course, been changed ...
> > but it is structurally original to the original valid address.
>
> Looks like wl-summary-line-from return a list, not a string.
>
> Please check the following patch against Org 5.17a.
>
>
> --
> Bastien
>
>
_______________________________________________
Emacs-orgmode mailing list
Remember: use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode
