From mboxrd@z Thu Jan 1 00:00:00 1970 From: Eric Abrahamsen Subject: Re: [PATCH] org-end-of-meta-data-and-drawers Date: Wed, 29 Jun 2011 11:52:04 -0400 Message-ID: <8762noeiu3.fsf@ericabrahamsen.net> References: <87vcwggcud.fsf@ericabrahamsen.net> <87r573hmgq.fsf@ericabrahamsen.net> <87mxhrhm1k.fsf@ericabrahamsen.net> Mime-Version: 1.0 Content-Type: text/plain Return-path: Received: from eggs.gnu.org ([140.186.70.92]:48047) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Qbx3s-0001c5-NK for emacs-orgmode@gnu.org; Wed, 29 Jun 2011 11:52:21 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Qbx3r-00027j-E7 for emacs-orgmode@gnu.org; Wed, 29 Jun 2011 11:52:20 -0400 Received: from lo.gmane.org ([80.91.229.12]:51786) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Qbx3r-00027X-2z for emacs-orgmode@gnu.org; Wed, 29 Jun 2011 11:52:19 -0400 Received: from list by lo.gmane.org with local (Exim 4.69) (envelope-from ) id 1Qbx3n-0000BL-Gr for emacs-orgmode@gnu.org; Wed, 29 Jun 2011 17:52:15 +0200 Received: from c-68-54-81-168.hsd1.md.comcast.net ([68.54.81.168]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Wed, 29 Jun 2011 17:52:15 +0200 Received: from eric by c-68-54-81-168.hsd1.md.comcast.net with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Wed, 29 Jun 2011 17:52:15 +0200 List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org It looks like patch-acceptance has picked up again recently -- may I humbly bump the fix below? Such a useful helper function, otherwise! Thanks, Eric > diff --git a/lisp/org.el b/lisp/org.el > index 777850a..ee0b88c 100644 > --- a/lisp/org.el > +++ b/lisp/org.el > @@ -19992,7 +19992,7 @@ clocking lines, and drawers." > "\\|" > "\\([ \t]*\\(" org-keyword-time-regexp "\\)\\)"))) > (forward-line 1) > - (while (looking-at (concat "[ \t]*\\(" org-keyword-time-regexp "\\)")) > + (while (looking-at re) > (if (not (match-end 1)) > ;; empty or planning line > (forward-line 1)