From mboxrd@z Thu Jan 1 00:00:00 1970 From: Carsten Dominik Subject: Re: Re: Link to MH-E message that has been refiled Date: Fri, 13 Jun 2008 23:13:42 +0200 Message-ID: <9ED8DE8C-E212-4853-9FAB-4E22C592C58A@uva.nl> References: <28089.1213382821@norvel.baumann-gauting.site> Mime-Version: 1.0 (Apple Message framework v924) Content-Type: text/plain; charset=US-ASCII; format=flowed Content-Transfer-Encoding: 7bit Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1K7Gaz-0007SM-7P for emacs-orgmode@gnu.org; Fri, 13 Jun 2008 17:14:05 -0400 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1K7Gax-0007R4-Kg for emacs-orgmode@gnu.org; Fri, 13 Jun 2008 17:14:04 -0400 Received: from [199.232.76.173] (port=42601 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1K7Gax-0007Qx-8Q for emacs-orgmode@gnu.org; Fri, 13 Jun 2008 17:14:03 -0400 Received: from ug-out-1314.google.com ([66.249.92.174]:56244) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1K7Gax-0005nq-0y for emacs-orgmode@gnu.org; Fri, 13 Jun 2008 17:14:03 -0400 Received: by ug-out-1314.google.com with SMTP id l31so152972ugc.48 for ; Fri, 13 Jun 2008 14:14:01 -0700 (PDT) In-Reply-To: <28089.1213382821@norvel.baumann-gauting.site> 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: dtbaumann@yahoo.de Cc: Carsten Dominik , emacs-orgmode@gnu.org Applied, thanks. - Carsten On Jun 13, 2008, at 8:47 PM, Thomas Baumann wrote: > and there's a bug with org-mhe-get-message-folder-from-index returning > "nil" instead of nil > > fixed with the patch below > > diff --git a/lisp/org-mhe.el b/lisp/org-mhe.el > index eb2c9ab..7f0d7f4 100644 > --- a/lisp/org-mhe.el > +++ b/lisp/org-mhe.el > @@ -141,8 +141,8 @@ So if you use sequences, it will now work." > "Return the name of the message folder in a index folder buffer." > (save-excursion > (mh-index-previous-folder) > - (re-search-forward "^\\(+.*\\)$" nil t) > - (message "%s" (match-string 1)))) > + (if (re-search-forward "^\\(+.*\\)$" nil t) > + (message "%s" (match-string 1))))) > > (defun org-mhe-get-message-folder () > "Return the name of the current message folder. > > > _______________________________________________ > 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