From 2c7179c43596d02130f49de9ca367be6568967ec Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Sun, 26 Jan 2014 14:29:25 +0100 Subject: [PATCH 4/4] ox-groff: Remove quote section translator To: n.goaziou@gmail.com MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="------------1.8.5.3" This is a multi-part message in MIME format. --------------1.8.5.3 Content-Type: text/plain; charset=UTF-8; format=fixed Content-Transfer-Encoding: 8bit * contrib/lisp/ox-groff.el (org-groff-quote-section): Remove function. --- contrib/lisp/ox-groff.el | 10 ---------- 1 file changed, 10 deletions(-) --------------1.8.5.3 Content-Type: text/x-patch; name="0004-ox-groff-Remove-quote-section-translator.patch" Content-Transfer-Encoding: 8bit Content-Disposition: inline; filename="0004-ox-groff-Remove-quote-section-translator.patch" diff --git a/contrib/lisp/ox-groff.el b/contrib/lisp/ox-groff.el index 249e254..f74bb14 100644 --- a/contrib/lisp/ox-groff.el +++ b/contrib/lisp/ox-groff.el @@ -77,7 +77,6 @@ (planning . org-groff-planning) (property-drawer . org-groff-property-drawer) (quote-block . org-groff-quote-block) - (quote-section . org-groff-quote-section) (radio-target . org-groff-radio-target) (section . org-groff-section) (special-block . org-groff-special-block) @@ -1457,15 +1456,6 @@ holding contextual information." quote-block (format ".DS I\n.I\n%s\n.R\n.DE" contents))) -;;; Quote Section - -(defun org-groff-quote-section (quote-section contents info) - "Transcode a QUOTE-SECTION element from Org to Groff. -CONTENTS is nil. INFO is a plist holding contextual information." - (let ((value (org-remove-indentation - (org-element-property :value quote-section)))) - (when value (format ".DS L\n\\fI%s\\fP\n.DE\n" value)))) - ;;; Radio Target (defun org-groff-radio-target (radio-target text info) --------------1.8.5.3--