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

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

[elpa] externals/org a58ab90395 3/3: lisp/ox-latex.el: Add export option


From: ELPA Syncer
Subject: [elpa] externals/org a58ab90395 3/3: lisp/ox-latex.el: Add export option for `org-latex-listings-src-omit-language'
Date: Sun, 18 Dec 2022 08:57:52 -0500 (EST)

branch: externals/org
commit a58ab903955461d36bf0aece334ff4bf5f15e127
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>

    lisp/ox-latex.el: Add export option for 
`org-latex-listings-src-omit-language'
    
    * lisp/ox-latex.el (latex):
    (org-latex-src-block--listings): Use a proper export option, not just
    a `defcustom'.
---
 lisp/ox-latex.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lisp/ox-latex.el b/lisp/ox-latex.el
index ca05b0508f..663e4141cb 100644
--- a/lisp/ox-latex.el
+++ b/lisp/ox-latex.el
@@ -156,6 +156,7 @@
     (:latex-src-block-backend nil nil org-latex-src-block-backend)
     (:latex-listings-langs nil nil org-latex-listings-langs)
     (:latex-listings-options nil nil org-latex-listings-options)
+    (:latex-listings-src-omit-language nil nil 
org-latex-listings-src-omit-language)
     (:latex-minted-langs nil nil org-latex-minted-langs)
     (:latex-minted-options nil nil org-latex-minted-options)
     (:latex-prefer-user-labels nil nil org-latex-prefer-user-labels)
@@ -3610,10 +3611,10 @@ and FLOAT are extracted from SRC-BLOCK and INFO in 
`org-latex-src-block'."
           ((string= "multicolumn" float) '(("float" "*")))
           ((and float (not (assoc "float" lst-opt)))
            `(("float" ,(plist-get info :latex-default-figure-position)))))
-         (unless org-latex-listings-src-omit-language
+         (unless (plist-get info :latex-listings-src-omit-language)
            `(("language" ,lst-lang)))
          (when label
-             `(("label" ,(org-latex--label src-block info))))
+           `(("label" ,(org-latex--label src-block info))))
          (when caption-str
            `(("caption" ,caption-str)))
          (when caption-str



reply via email to

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