branch: elpa/aidermacs
commit 4f946571c9deedf1e492146b43c55def6343ab55
Merge: cf3063f5d3 c07fe5d615
Author: Matthew Zeng <matthew...@posteo.net>
Commit: GitHub <nore...@github.com>

    Merge pull request #35 from CeleritasCelery/syntax_fix
    
    Fix syntax highlighting when code fence does not have mode
---
 aidermacs-backend-comint.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/aidermacs-backend-comint.el b/aidermacs-backend-comint.el
index 06967020bd..297c28119f 100644
--- a/aidermacs-backend-comint.el
+++ b/aidermacs-backend-comint.el
@@ -211,7 +211,7 @@ OUTPUT is the text to be processed."
               (mode (map-elt aidermacs-language-name-map lang lang)))
          (intern-soft (concat mode "-mode"))))
      ;; check the file extension in auto-mode-alist
-     (when (re-search-backward "^\\([^[:space:]]+\\)" (line-beginning-position 
-3) t)
+     (when (re-search-backward "^\\([^[:space:]`]+\\)" 
(line-beginning-position -3) t)
        (let ((file (match-string 1)))
          (cdr (cl-assoc-if (lambda (re) (string-match re file)) 
auto-mode-alist))))
      aidermacs--syntax-major-mode

Reply via email to