EXPERIMENTAL/org-e-latex: Fix transcoding of example-block elements
* EXPERIMENTAL/org-e-latex.el (org-e-latex-example-block): Fix transcoding. Verbatim environment was omitted. (org-e-latex-fixed-width): Whitespace cleanup.
This commit is contained in:
parent
6d2a98552d
commit
938f126511
|
@ -895,7 +895,8 @@ CONTENTS is nil. INFO is a plist holding contextual information."
|
||||||
(let* ((options (or (org-element-get-property :options example-block) ""))
|
(let* ((options (or (org-element-get-property :options example-block) ""))
|
||||||
(value (org-export-handle-code
|
(value (org-export-handle-code
|
||||||
(org-element-get-property :value example-block) options info)))
|
(org-element-get-property :value example-block) options info)))
|
||||||
(org-e-latex--wrap-label example-block value)))
|
(org-e-latex--wrap-label
|
||||||
|
example-block (format "\\begin{verbatim}\n%s\\end{verbatim}" value))))
|
||||||
|
|
||||||
|
|
||||||
;;;; Export Snippet
|
;;;; Export Snippet
|
||||||
|
@ -925,8 +926,7 @@ CONTENTS is nil. INFO is a plist holding contextual information."
|
||||||
"^[ \t]*: ?" ""
|
"^[ \t]*: ?" ""
|
||||||
(org-element-get-property :value fixed-width)))))
|
(org-element-get-property :value fixed-width)))))
|
||||||
(org-e-latex--wrap-label
|
(org-e-latex--wrap-label
|
||||||
fixed-width
|
fixed-width (format "\\begin{verbatim}\n%s\\end{verbatim}" value))))
|
||||||
(format "\\begin{verbatim}\n%s\\end{verbatim}" value))))
|
|
||||||
|
|
||||||
|
|
||||||
;;;; Footnote Definition
|
;;;; Footnote Definition
|
||||||
|
|
Loading…
Reference in New Issue