summaryrefslogtreecommitdiff
path: root/.emacs.d/lisp/markdown-mode.el
diff options
context:
space:
mode:
authorSimeon Simeonov2022-10-22 11:51:14 +0200
committerSimeon Simeonov2022-10-22 11:51:14 +0200
commitfb01ddbc487794a2d53fb13733dc03f73dee37ed (patch)
tree9c28a0c9333da70b70413edc5cda346cf83f0118 /.emacs.d/lisp/markdown-mode.el
parent3ba23d3758e06d95b14ed4e89607e258d15ddbf7 (diff)
Update markdown-modeand yaml-mode. Update .emacs
Diffstat (limited to '.emacs.d/lisp/markdown-mode.el')
-rw-r--r--.emacs.d/lisp/markdown-mode.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/.emacs.d/lisp/markdown-mode.el b/.emacs.d/lisp/markdown-mode.el
index aa27e4e..ae6dc47 100644
--- a/.emacs.d/lisp/markdown-mode.el
+++ b/.emacs.d/lisp/markdown-mode.el
@@ -2923,7 +2923,8 @@ When FACELESS is non-nil, do not return matches where faces have been applied."
2923 (markdown-in-comment-p) 2923 (markdown-in-comment-p)
2924 (markdown-range-property-any 2924 (markdown-range-property-any
2925 begin begin 'face '(markdown-url-face 2925 begin begin 'face '(markdown-url-face
2926 markdown-plain-url-face)) 2926 markdown-plain-url-face
2927 markdown-markup-face))
2927 (markdown-range-property-any 2928 (markdown-range-property-any
2928 begin end 'face '(markdown-bold-face 2929 begin end 'face '(markdown-bold-face
2929 markdown-list-face 2930 markdown-list-face
@@ -8156,13 +8157,13 @@ newline after."
8156 (let* ((modified (buffer-modified-p)) 8157 (let* ((modified (buffer-modified-p))
8157 (buffer-undo-list t) 8158 (buffer-undo-list t)
8158 (inhibit-read-only t) 8159 (inhibit-read-only t)
8159 (inhibit-point-motion-hooks t)
8160 deactivate-mark 8160 deactivate-mark
8161 buffer-file-truename) 8161 buffer-file-truename)
8162 (unwind-protect 8162 (unwind-protect
8163 (save-excursion 8163 (save-excursion
8164 (save-match-data 8164 (save-match-data
8165 (save-restriction 8165 (save-restriction
8166 (cursor-intangible-mode +1) ;; inhibit-point-motion-hooks is obsoleted since Emacs 29
8166 ;; Extend the region to fontify so that it starts 8167 ;; Extend the region to fontify so that it starts
8167 ;; and ends at safe places. 8168 ;; and ends at safe places.
8168 (cl-multiple-value-bind (new-from new-to) 8169 (cl-multiple-value-bind (new-from new-to)
@@ -8179,6 +8180,7 @@ newline after."
8179 (markdown-unfontify-region-wiki-links new-from new-to) 8180 (markdown-unfontify-region-wiki-links new-from new-to)
8180 ;; Now do the fontification. 8181 ;; Now do the fontification.
8181 (markdown-fontify-region-wiki-links new-from new-to)))))) 8182 (markdown-fontify-region-wiki-links new-from new-to))))))
8183 (cursor-intangible-mode -1)
8182 (and (not modified) 8184 (and (not modified)
8183 (buffer-modified-p) 8185 (buffer-modified-p)
8184 (set-buffer-modified-p nil))))) 8186 (set-buffer-modified-p nil)))))