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

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

[nongnu] elpa/evil-nerd-commenter 4bf2a84ba5 189/235: prefer org-src-lan


From: ELPA Syncer
Subject: [nongnu] elpa/evil-nerd-commenter 4bf2a84ba5 189/235: prefer org-src-lang-modes over language property of org src
Date: Thu, 6 Jan 2022 02:59:47 -0500 (EST)

branch: elpa/evil-nerd-commenter
commit 4bf2a84ba506fa6c76c0626f31f2775f1872722d
Author: Benedikt Tissot <benedikt@tissot.de>
Commit: Benedikt Tissot <benedikt@tissot.de>

    prefer org-src-lang-modes over language property of org src
---
 evil-nerd-commenter.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/evil-nerd-commenter.el b/evil-nerd-commenter.el
index 837c37fd51..e07672b1c5 100644
--- a/evil-nerd-commenter.el
+++ b/evil-nerd-commenter.el
@@ -326,7 +326,9 @@ See 
http://lists.gnu.org/archive/html/bug-gnu-emacs/2013-03/msg00891.html.";
 
        ;; Emacs 26.1
        ((fboundp 'org-element-at-point)
-        (setq lang (org-element-property :language (org-element-at-point))))))
+        (setq lang
+              (let ((lang (org-element-property :language 
(org-element-at-point))))
+                (or (cdr (assoc lang org-src-lang-modes)) lang))))))
     (when lang
       (setq lang (if (symbolp lang) (symbol-name lang) lang))
       (setq lang-f (intern (concat lang "-mode"))))



reply via email to

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