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

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

[elpa] externals/org d37c0ee5fa 2/2: lisp/ox-latex.el: Remove obsolete B


From: ELPA Syncer
Subject: [elpa] externals/org d37c0ee5fa 2/2: lisp/ox-latex.el: Remove obsolete Babel and Polyglossia alists
Date: Thu, 28 Jul 2022 08:57:44 -0400 (EDT)

branch: externals/org
commit d37c0ee5fa7dc4be4bbe3aa9b6f4e79d4b1e638d
Author: Juan Manuel Macias <maciaschain@posteo.net>
Commit: Ihor Radchenko <yantar92@gmail.com>

    lisp/ox-latex.el: Remove obsolete Babel and Polyglossia alists
    
    * (org-latex--format-spec): The new variable is now 
`org-latex-language-alist'.
---
 lisp/ox-latex.el | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/lisp/ox-latex.el b/lisp/ox-latex.el
index 121a3f84c6..1ed9889178 100644
--- a/lisp/ox-latex.el
+++ b/lisp/ox-latex.el
@@ -1861,8 +1861,11 @@ INFO is a plist used as a communication channel."
   "Create a format-spec for document meta-data.
 INFO is a plist used as a communication channel."
   (let ((language (let ((lang (plist-get info :language)))
-                   (or (cdr (assoc-string lang org-latex-babel-language-alist 
t))
-                       (nth 1 (assoc-string lang 
org-latex-polyglossia-language-alist t))
+                    ;; The second element in
+                    ;; `org-latex-language-alist' is always the
+                    ;; language name, regardless of the type of the
+                    ;; alist entry.
+                    (or (nth 1 (assoc-string lang org-latex-language-alist t))
                        lang))))
     `((?a . ,(org-export-data (plist-get info :author) info))
       (?t . ,(org-export-data (plist-get info :title) info))



reply via email to

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