[PATCH] Fixed lstset where language= wipes out previous definitions

[PATCH] Fixed lstset where language= wipes out previous definitions

[Karl Stump]

* ox-latex.el (org-latex-src-block): moved (("language" ,lst-lang)) to the head of the list.
This fixes wiping out preceding definitions given in `org-latex-listings-options'.
TINYCHANGE
---
 lisp/ox-latex.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/ox-latex.el b/lisp/ox-latex.el
index b9ecf070a..f956c851e 100644
--- a/lisp/ox-latex.el
+++ b/lisp/ox-latex.el
@@ -3075,13 +3075,13 @@ contextual information."
 	    (concat
 	     (org-latex--make-option-string
 	      (append
-	       lst-opt
+               `(("language" ,lst-lang))
+               lst-opt
 	       (cond
 		((and (not float) (plist-member attributes :float)) nil)
 		((string= "multicolumn" float) '(("float" "*")))
 		((and float (not (assoc "float" lst-opt)))
 		 `(("float" ,(plist-get info :latex-default-figure-position)))))
-	       `(("language" ,lst-lang))
 	       (if label
 		   `(("label" ,(org-latex--label src-block info)))
 		 '(("label" " ")))
-- 
2.31.0

Re: [PATCH] Fixed lstset where language= wipes out previous definitions

[Timothy]

[-- Attachment #1: Type: text/plain, Size: 1426 bytes --]

Hi  Karl,

Thanks for sending in this patch, and sorry it’s taken so long for someone to
get back to you. Would you mind explaining the issue here a bit more? I can’t
see at a glance how preceding definitions are wiped in the current
code.

Karl Stump <karlstump@gmail.com> writes:

> * ox-latex.el (org-latex-src-block): moved ((“language” ,lst-lang)) to the head of the list.
> This fixes wiping out preceding definitions given in `org-latex-listings-options’.
> TINYCHANGE
> —
>  lisp/ox-latex.el | 4 ++–
>  1 file changed, 2 insertions(+), 2 deletions(-)
>
> diff –git a/lisp/ox-latex.el b/lisp/ox-latex.el
> index b9ecf070a..f956c851e 100644
> — a/lisp/ox-latex.el
> +++ b/lisp/ox-latex.el
> @@ -3075,13 +3075,13 @@ contextual information.“
>  	    (concat
>  	     (org-latex–make-option-string
>  	      (append
> -	       lst-opt
> +               `((”language“ ,lst-lang))
> +               lst-opt
>  	       (cond
>  		((and (not float) (plist-member attributes :float)) nil)
>  		((string= ”multicolumn“ float) ’((”float“ ”*“)))
>  		((and float (not (assoc ”float“ lst-opt)))
>  		 `((”float“ ,(plist-get info :latex-default-figure-position)))))
> -	       `((”language“ ,lst-lang))
>  	       (if label
>  		   `((”label“ ,(org-latex–label src-block info)))
>  		 ’((”label“ ” “)))

All the best,
Timothy

Re: [PATCH] Fixed lstset where language= wipes out previous definitions

[Bastien]

Hi Karl,

can you expand a bit more on why this patch would be useful?  Perhaps
by providing a reproducible use-case where the problem appears?

Thanks,

-- 
 Bastien