From mboxrd@z Thu Jan 1 00:00:00 1970 From: Carsten Dominik Subject: Re: Re: OrgmodeGeneric export: Missing (?) 'body-section-suffix' Date: Fri, 8 Jan 2010 17:35:00 +0100 Message-ID: <7B02EC7F-9A3C-4495-B3A9-170C51BD5AB2@gmail.com> References: Mime-Version: 1.0 (Apple Message framework v936) 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 1NTIzg-0005ey-6k for emacs-orgmode@gnu.org; Fri, 08 Jan 2010 12:51:28 -0500 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1NTIzb-0005cP-D7 for emacs-orgmode@gnu.org; Fri, 08 Jan 2010 12:51:27 -0500 Received: from [199.232.76.173] (port=56024 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1NTIzb-0005cK-6p for emacs-orgmode@gnu.org; Fri, 08 Jan 2010 12:51:23 -0500 Received: from mail-ew0-f224.google.com ([209.85.219.224]:55680) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1NTIza-0004FQ-5k for emacs-orgmode@gnu.org; Fri, 08 Jan 2010 12:51:22 -0500 Received: by ewy24 with SMTP id 24so23064830ewy.26 for ; Fri, 08 Jan 2010 09:51:21 -0800 (PST) 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: Wes Hardaker Cc: Christian Lasarczyk , emacs-orgmode@gnu.org Applied, thanks. - Carsten On Jan 8, 2010, at 4:51 PM, Wes Hardaker wrote: >>>>>> On Thu, 07 Jan 2010 22:26:04 +0100, Christian Lasarczyk >>>>> > said: > > CL> In my opinion the body-section-suffix [ here =")" ] is missing for > CL> all last section levels (hhh & jjj), so I expected an additional > CL> "))" at the end. > > You're right that after the parsing is done it doesn't "pop back up" > the > level tree for any close-out stuff. Good catch. > > Here's a patch to fix this (Carsten: can you apply it to your git > tree?) > > diff --git a/contrib/lisp/org-export-generic.el b/contrib/lisp/org- > export-generic.el > index 90517c0..7b4a30d 100644 > --- a/contrib/lisp/org-export-generic.el > +++ b/contrib/lisp/org-export-generic.el > @@ -949,6 +949,15 @@ underlined headlines. The default is 3." > (org-export-generic-wrap line bodylinewrap)) > (setq line line))) > (insert (format bodylineform line))))) > + > + ;; if we're at a level > 0; insert the closing body level stuff > + (let ((counter 0)) > + (while (> (- level counter) 0) > + (insert > + (org-export-generic-format export-plist :body-section-suffix 0 > + (- level counter))) > + (setq counter (1+ counter)))) > + > (org-export-generic-check-section "bottom") > > (org-export-generic-push-links (nreverse link-buffer)) > > -- > Wes Hardaker > My Pictures: http://capturedonearth.com/ > My Thoughts: http://pontifications.hardakers.net/ > > > _______________________________________________ > Emacs-orgmode mailing list > Please use `Reply All' to send replies to the list. > Emacs-orgmode@gnu.org > http://lists.gnu.org/mailman/listinfo/emacs-orgmode - Carsten