emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals-release/org 34a8133715 2/2: Revert "lisp/ox-latex.el: p


From: ELPA Syncer
Subject: [elpa] externals-release/org 34a8133715 2/2: Revert "lisp/ox-latex.el: put labels inside example blocks"
Date: Thu, 8 Dec 2022 07:57:52 -0500 (EST)

branch: externals-release/org
commit 34a81337151487fde7f8d499cdd4c6d891cebd67
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>

    Revert "lisp/ox-latex.el: put labels inside example blocks"
    
    This reverts commit 304f18cb72dbb3aeade41ed6c5e8dfefca7e1744.
    
    This patch will break verbatim environment as the label will be
    interpreted verbatim as well.
---
 lisp/ox-latex.el | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/lisp/ox-latex.el b/lisp/ox-latex.el
index 63070d0f9b..5b29a284c9 100644
--- a/lisp/ox-latex.el
+++ b/lisp/ox-latex.el
@@ -2131,13 +2131,13 @@ information."
     (let ((environment (or (org-export-read-attribute
                            :attr_latex example-block :environment)
                           "verbatim")))
-      (format "\\begin{%s}%s\n%s\\end{%s}"
-             environment
-              (if (org-element-property :name example-block)
-                  (org-latex--label example-block info nil 'full)
-                "")
-             (org-export-format-code-default example-block info)
-             environment))))
+      (org-latex--wrap-label
+       example-block
+       (format "\\begin{%s}\n%s\\end{%s}"
+              environment
+              (org-export-format-code-default example-block info)
+              environment)
+       info))))
 
 
 ;;;; Export Block



reply via email to

[Prev in Thread] Current Thread [Next in Thread]