Patch 999 (http://patchwork.newartisans.com/patch/999/) is now "Accepted".
Maintainer comment: none This relates to the following submission: http://mid.gmane.org/%3C1319213609-40770-3-git-send-email-rpgoldman%40real-time.com%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,2/5] Added trac-wiki and tikiwiki export settings. > Date: Fri, 21 Oct 2011 21:13:26 -0000 > From: Robert P. Goldman <rpgold...@real-time.com> > X-Patchwork-Id: 999 > Message-Id: <1319213609-40770-3-git-send-email-rpgold...@real-time.com> > To: emacs-orgmode@gnu.org > Cc: "Robert P. Goldman" <rpgold...@real-time.com> > > --- > contrib/lisp/org-export-generic.el | 107 > +++++++++++++++++++++++++++++++----- > 1 files changed, 93 insertions(+), 14 deletions(-) > > > diff --git a/contrib/lisp/org-export-generic.el > b/contrib/lisp/org-export-generic.el > index 29e90b8..e3a8680 100644 > --- a/contrib/lisp/org-export-generic.el > +++ b/contrib/lisp/org-export-generic.el > @@ -187,8 +187,8 @@ in this way, it will be wrapped." > ; section prefixes/suffixes can be > direct strings or lists as well > :body-section-prefix "<secprefix>\n" > :body-section-suffix "</secsuffix>\n" > -; :body-section-prefix ("<sec1>\n" "<sec2>\n" "<sec3>\n") > -; :body-section-suffix ("</sec1>\n" "</sec2>\n" "</sec3>\n") > + ; :body-section-prefix > ("<sec1>\n" "<sec2>\n" "<sec3>\n") > + ; :body-section-suffix > ("</sec1>\n" "</sec2>\n" "</sec3>\n") > > > ; if preformated text should be > included (eg, : prefixed) > @@ -263,28 +263,28 @@ in this way, it will be wrapped." > :body-header-section-numbers 3 > :body-section-prefix "\n" > > -; :body-section-header-prefix "\n" > -; :body-section-header-format "%s\n" > -; :body-section-header-suffix (?\$ ?\# ?^ ?\~ ?\= ?\-) > + ; :body-section-header-prefix > "\n" > + ; :body-section-header-format > "%s\n" > + ; :body-section-header-suffix > (?\$ ?\# ?^ ?\~ ?\= ?\-) > > :body-section-header-prefix ("" "" "" "* " " + " " - ") > :body-section-header-format "%s\n" > :body-section-header-suffix (?~ ?= ?- "\n" "\n" "\n") > > -; :body-section-marker-prefix "" > -; :body-section-marker-chars (?\$ ?\# ?^ ?\~ ?\= ?\-) > -; :body-section-marker-suffix "\n" > + ; :body-section-marker-prefix "" > + ; :body-section-marker-chars > (?\$ ?\# ?^ ?\~ ?\= ?\-) > + ; :body-section-marker-suffix > "\n" > > :body-line-export-preformated t > :body-line-format "%s\n" > :body-line-wrap 75 > > -; :body-text-prefix "<t>\n" > -; :body-text-suffix "</t>\n" > + ; :body-text-prefix "<t>\n" > + ; :body-text-suffix "</t>\n" > > > :body-bullet-list-prefix (?* ?+ ?-) > -; :body-bullet-list-suffix (?* ?+ ?-) > + ; :body-bullet-list-suffix > (?* ?+ ?-) > ) > > ;; > @@ -350,8 +350,8 @@ in this way, it will be wrapped." > > :body-section-prefix "<secprefix>\n" > :body-section-suffix "</secsuffix>\n" > -; :body-section-prefix ("<sec1>\n" "<sec2>\n" "<sec3>\n") > -; :body-section-suffix ("</sec1>\n" "</sec2>\n" "</sec3>\n") > + ; :body-section-prefix > ("<sec1>\n" "<sec2>\n" "<sec3>\n") > + ; :body-section-suffix > ("</sec1>\n" "</sec2>\n" "</sec3>\n") > > :body-line-export-preformated t > :body-line-format "%s\n" > @@ -360,7 +360,7 @@ in this way, it will be wrapped." > :body-text-suffix "</p>\n" > > :body-bullet-list-prefix (?* ?+ ?-) > -; :body-bullet-list-suffix (?* ?+ ?-) > + ; :body-bullet-list-suffix > (?* ?+ ?-) > ) > > ;; > @@ -429,6 +429,85 @@ in this way, it will be wrapped." > :body-list-format "<t>%s</t>\n" > > ) > + ("trac-wiki" > + :file-suffix ".txt" > + :key-binding ?T > + > + ;; lifted from wikipedia exporter > + :header-prefix "" > + :header-suffix "" > + > + :title-format "= %s =\n" > + > + :date-export nil > + > + :toc-export nil > + > + :body-header-section-numbers nil > + :body-section-prefix "\n" > + > + :body-section-header-prefix ("== " "=== " "==== " > + "===== " "====== " "======= ") > + :body-section-header-suffix (" ==\n\n" " ===\n\n" " ====\n\n" > + " =====\n\n" " ======\n\n" " =======\n\n") > + > + :body-line-export-preformated t ;; yes/no/maybe??? > + :body-line-format "%s\n" > + :body-line-wrap 75 > + > + :body-line-fixed-format " %s\n" > + > + :body-list-format " * %s\n" > + :body-number-list-format " # %s\n" > + ;; :body-list-prefix "LISTSTART" > + ;; :body-list-suffix "LISTEND" > + > + ;; this is ignored! [2010/02/02:rpg] > + :body-bullet-list-prefix ("* " "** " "*** " "**** " "***** ") > + ) > + ("tikiwiki" > + :file-suffix ".txt" > + :key-binding ?U > + > + ;; lifted from wikipedia exporter > + :header-prefix "" > + :header-suffix "" > + > + :title-format "-= %s =-\n" > + > + :date-export nil > + > + :toc-export nil > + > + :body-header-section-numbers nil > + :body-section-prefix "\n" > + > + :body-section-header-prefix ("! " "!! " "!!! " "!!!! " > + "!!!!! " "!!!!!! " "!!!!!!! ") > + :body-section-header-suffix (" \n" " \n" " \n" > + " \n" " \n" " \n") > + > + > + :body-line-export-preformated t ;; yes/no/maybe??? > + :body-line-format "%s " > + :body-line-wrap nil > + > + :body-line-fixed-format " %s\n" > + > + :body-list-format "* %s\n" > + :body-number-list-format "# %s\n" > + ;; :body-list-prefix "LISTSTART" > + ;; :body-list-suffix "LISTEND" > + :blockquote-start "\n^\n" > + :blockquote-end "^\n\n" > + :body-newline-paragraph "\n" > + :bold-format "__%s__" > + :italic-format "''%s''" > + :underline-format "===%s===" > + :strikethrough-format "--%s--" > + :code-format "-+%s+-" > + :verbatim-format "~pp~%s~/pp~" > + ) > ) > "A assoc list of property lists to specify export definitions" > ) >