From mboxrd@z Thu Jan 1 00:00:00 1970 From: Bastien Guerry Subject: [Accepted] Prevent creation of duplicate footnote sections. Date: Thu, 17 Mar 2011 09:24:36 +0100 (CET) Message-ID: <20110317082436.9F7C86523@myhost.localdomain> References: <87zkozi2j5.fsf@fastmail.fm> Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Content-Transfer-Encoding: 7bit Return-path: Received: from [140.186.70.92] (port=57724 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Q08Vt-0000dz-JP for emacs-orgmode@gnu.org; Thu, 17 Mar 2011 04:24:59 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Q08Vr-0000si-Lc for emacs-orgmode@gnu.org; Thu, 17 Mar 2011 04:24:56 -0400 Received: from mail-wy0-f169.google.com ([74.125.82.169]:54069) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Q08Vr-0000sW-H2 for emacs-orgmode@gnu.org; Thu, 17 Mar 2011 04:24:55 -0400 Received: by wyf19 with SMTP id 19so2772287wyf.0 for ; Thu, 17 Mar 2011 01:24:54 -0700 (PDT) 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: emacs-orgmode@gnu.org Patch 679 (http://patchwork.newartisans.com/patch/679/) is now "Accepted". Maintainer comment: none This relates to the following submission: http://mid.gmane.org/%3C87zkozi2j5.fsf%40fastmail.fm%3E Here is the original message containing the patch: > Content-Type: text/plain; charset="utf-8" > MIME-Version: 1.0 > Content-Transfer-Encoding: 7bit > Subject: [O] Prevent creation of duplicate footnote sections. > Date: Fri, 11 Mar 2011 18:49:06 -0000 > From: Matt Lundin > X-Patchwork-Id: 679 > Message-Id: <87zkozi2j5.fsf@fastmail.fm> > To: Org Mode > > * lisp/org-footnote.el: (org-footnote-create-definition): Allow for > footnote sections above the current footnote insertion point. > > Fixes bug in which org-mode will create a new footnote section if the > current footnote section is not beneath the current insertion point. > > --- > lisp/org-footnote.el | 1 + > 1 files changed, 1 insertions(+), 0 deletions(-) > > diff --git a/lisp/org-footnote.el b/lisp/org-footnote.el > index 0524b41..2ce6668 100644 > --- a/lisp/org-footnote.el > +++ b/lisp/org-footnote.el > @@ -291,6 +291,7 @@ or new, let the user edit the definition of the footnote." > ;; No section, put footnote into the current outline node > nil > ;; Try to find or make the special node > + (goto-char (point-min)) > (setq re (concat "^\\*+[ \t]+" org-footnote-section "[ \t]*$")) > (unless (or (re-search-forward re nil t) > (and (progn (widen) t) >