mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-09-29 22:07:49 +00:00
ox-latex: Fix source block label with listings package
* lisp/ox-latex.el (org-latex-src-block): Properly translate label into Org internal reference when using "listings" package.
This commit is contained in:
parent
a2b1be7461
commit
adaf808605
|
@ -2934,7 +2934,9 @@ contextual information."
|
||||||
((and float (not (assoc "float" lst-opt)))
|
((and float (not (assoc "float" lst-opt)))
|
||||||
`(("float" ,(plist-get info :latex-default-figure-position)))))
|
`(("float" ,(plist-get info :latex-default-figure-position)))))
|
||||||
`(("language" ,lst-lang))
|
`(("language" ,lst-lang))
|
||||||
(if label `(("label" ,label)) '(("label" " ")))
|
(if label
|
||||||
|
`(("label" ,(org-latex--label src-block info)))
|
||||||
|
'(("label" " ")))
|
||||||
(if caption-str `(("caption" ,caption-str)) '(("caption" " ")))
|
(if caption-str `(("caption" ,caption-str)) '(("caption" " ")))
|
||||||
`(("captionpos" ,(if caption-above-p "t" "b")))
|
`(("captionpos" ,(if caption-above-p "t" "b")))
|
||||||
(cond ((assoc "numbers" lst-opt) nil)
|
(cond ((assoc "numbers" lst-opt) nil)
|
||||||
|
|
Loading…
Reference in a new issue