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'.
This commit is contained in:
Ihor Radchenko 2022-12-18 16:14:14 +03:00
parent 322b2fd226
commit a58ab90395
No known key found for this signature in database
GPG Key ID: 6470762A7DA11D8B
1 changed files with 3 additions and 2 deletions

View File

@ -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,7 +3611,7 @@ 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))))