Re: Problem with org-mac-message.el

[Christopher Suckling <suckling.list@googlemail.com>]

On 1 Apr 2009, at 21:21, Ed Hirgelt wrote:

> I've found that org-mac-message-get-link has a problem inserting  
> [["]] as the first item.

I can't replicate this. Could you provide an example?

> The following change makes it better...

Unfortunately, this change breaks the code for all other  
possibilities, and, if I understand the problem correctly, simply  
omits a link that begins [["

My beginner's elisp is rather clumsy; I'm going to attempt to tidy up  
the code anyway, so I'll be on the lookout for your difficulty whilst  
I do so.

Best,

Christopher

>
> diff --git a/lisp/org-mac-message.el b/lisp/org-mac-message.el
> index 4e10062..e8697c4 100644
> --- a/lisp/org-mac-message.el
> +++ b/lisp/org-mac-message.el
> @@ -119,7 +119,7 @@ active mail in AppleMail and make a link out of  
> it."
> 	(setq split-link (split-string (pop link-list) "::split::"))
> 	(setq URL (car split-link))
> 	(setq description (cadr split-link))
> -	(if (not (string= URL ""))
> +	(if (not (string= URL "\""))
> 	    (progn
> 	      (setq orglink (org-make-link-string URL description))
> 	      (push orglink orglink-list)))))
>