瀏覽代碼

ox-groff: Remove quote section translator

* contrib/lisp/ox-groff.el (org-groff-quote-section): Remove function.
Nicolas Goaziou 11 年之前
父節點
當前提交
2b8fd33d0f
共有 1 個文件被更改,包括 0 次插入10 次删除
  1. 0 10
      contrib/lisp/ox-groff.el

+ 0 - 10
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)