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

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

[nongnu] elpa/lua-mode 535ca1b 128/468: lua-mark-char-multiline-delim, l


From: Philip Kaludercic
Subject: [nongnu] elpa/lua-mode 535ca1b 128/468: lua-mark-char-multiline-delim, lua-unmark-multiline-literals: inhibit after-change-functions to avoid running automarking twice on the same text
Date: Thu, 5 Aug 2021 04:58:21 -0400 (EDT)

branch: elpa/lua-mode
commit 535ca1b12acde8d75d7754e68e7b3ca4f50ff01f
Author: immerrr <immerrr+lua@gmail.com>
Commit: immerrr <immerrr+lua@gmail.com>

    lua-mark-char-multiline-delim,lua-unmark-multiline-literals: inhibit 
after-change-functions to avoid running automarking twice on the same text
---
 lua-mode.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lua-mode.el b/lua-mode.el
index bbdbe5f..37c8256 100644
--- a/lua-mode.el
+++ b/lua-mode.el
@@ -1218,7 +1218,7 @@ left out."
 
 If TYPE is string, mark char  as string delimiter. If TYPE is comment,
 mark char as comment delimiter.  Otherwise, remove the mark if any."
-  (let ((old-modified-p (buffer-modified-p)))
+  (let ((old-modified-p (buffer-modified-p)) (inhibit-modification-hooks t))
     (unwind-protect
         (lua-put-char-syntax-table pos (lua-get-multiline-delim-syntax type))
       (set-buffer-modified-p old-modified-p))))
@@ -1239,7 +1239,7 @@ mark char as comment delimiter.  Otherwise, remove the 
mark if any."
 If BEGIN is nil, start from `beginning-of-buffer'.
 If END is nil, stop at `end-of-buffer'."
   (interactive)
-  (let ((old-modified-p (buffer-modified-p)))
+  (let ((old-modified-p (buffer-modified-p)) (inhibit-modification-hooks t))
     (unwind-protect
         (remove-text-properties (or begin (point-min)) (or end (point-max)) 
'(syntax-table ()))
       (set-buffer-modified-p old-modified-p)))



reply via email to

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