From mboxrd@z Thu Jan 1 00:00:00 1970 From: Charles Durst Subject: [PATCH] ox-confluence.el: Add support for verbatim & code Date: Wed, 30 Nov 2016 17:41:22 -0500 Message-ID: Reply-To: cwdurst+orgmode@gmail.com Mime-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:36463) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1cCDZQ-0004uZ-Bj for emacs-orgmode@gnu.org; Wed, 30 Nov 2016 17:41:45 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1cCDZP-0008HQ-K0 for emacs-orgmode@gnu.org; Wed, 30 Nov 2016 17:41:44 -0500 Received: from mail-qt0-x236.google.com ([2607:f8b0:400d:c0d::236]:36791) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1cCDZP-0008Gw-F9 for emacs-orgmode@gnu.org; Wed, 30 Nov 2016 17:41:43 -0500 Received: by mail-qt0-x236.google.com with SMTP id w33so203030098qtc.3 for ; Wed, 30 Nov 2016 14:41:43 -0800 (PST) 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" To: emacs-orgmode@gnu.org A tiny patch to improve text formatting support for exporting to Confluence wiki-markup. -- Charles Durst cwdurst+orgmode@gmail.com * contrib/lisp/ox-confluence.el (org-confluence-verbatim, org-confluence-code): New functions. Convert org-mode =verbatim= and ~code~ into Confluence {{monospace}}. TINYCHANGE --- contrib/lisp/ox-confluence.el | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/contrib/lisp/ox-confluence.el b/contrib/lisp/ox-confluence.el index 48bc5ea..bbdc58a 100644 --- a/contrib/lisp/ox-confluence.el +++ b/contrib/lisp/ox-confluence.el @@ -41,6 +41,8 @@ :translate-alist '((bold . org-confluence-bold) (example-block . org-confluence-example-block) (fixed-width . org-confluence-fixed-width) + (verbatim . org-confluence-verbatim) + (code . org-confluence-code) (footnote-definition . org-confluence-empty) (footnote-reference . org-confluence-empty) (headline . org-confluence-headline) @@ -86,6 +88,12 @@ (defun org-confluence-fixed-width (fixed-width contents info) (format "\{\{%s\}\}" contents)) +(defun org-confluence-verbatim (verbatim contents info) + (format "\{\{%s\}\}" (org-element-property :value verbatim))) + +(defun org-confluence-code (code contents info) + (format "\{\{%s\}\}" (org-element-property :value code))) + (defun org-confluence-headline (headline contents info) (let ((low-level-rank (org-export-low-level-p headline info)) (text (org-export-data (org-element-property :title headline) -- 2.5.4 (Apple Git-61)