From mboxrd@z Thu Jan 1 00:00:00 1970 From: Carsten Dominik Subject: Re: Problem with org-mac-message.el Date: Fri, 3 Apr 2009 18:58:17 +0200 Message-ID: References: Mime-Version: 1.0 (Apple Message framework v930.3) Content-Type: text/plain; charset=US-ASCII; format=flowed; delsp=yes Content-Transfer-Encoding: 7bit Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1Lpmjp-0003zW-KS for emacs-orgmode@gnu.org; Fri, 03 Apr 2009 12:59:29 -0400 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1Lpmji-0003xl-P7 for emacs-orgmode@gnu.org; Fri, 03 Apr 2009 12:59:26 -0400 Received: from [199.232.76.173] (port=35061 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Lpmji-0003xi-ED for emacs-orgmode@gnu.org; Fri, 03 Apr 2009 12:59:22 -0400 Received: from ey-out-1920.google.com ([74.125.78.144]:32586) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1Lpmjh-0002qi-T4 for emacs-orgmode@gnu.org; Fri, 03 Apr 2009 12:59:22 -0400 Received: by ey-out-1920.google.com with SMTP id 13so205598eye.24 for ; Fri, 03 Apr 2009 09:59:19 -0700 (PDT) In-Reply-To: List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Christopher Suckling Cc: emacs-orgmode emacs-orgmode On Apr 3, 2009, at 4:49 PM, Christopher Suckling wrote: > > 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. I think I already fixed it..... - Carsten > > 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))))) >> > > > > _______________________________________________ > 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