[nongnu] elpa/lua-mode 742180e 125/468: lua-automark-multiline: add lua-automark-multiline-maxsize variable to prevent long waits on big files

[Philip Kaludercic]

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

    lua-automark-multiline: add lua-automark-multiline-maxsize variable to 
prevent long waits on big files
---
 lua-mode.el | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/lua-mode.el b/lua-mode.el
index a7cc482..9a3f5ad 100644
--- a/lua-mode.el
+++ b/lua-mode.el
@@ -1289,7 +1289,7 @@ If END is nil, stop at `end-of-buffer'."
     (add-hook 'change-major-mode-hook 'lua--automark-multiline-cleanup nil 
'local)
     (setq lua-automark-multiline-timer
           (run-with-idle-timer lua-automark-multiline-interval 'repeat
-                               'lua-mark-all-multiline-literals))))
+                               'lua--automark-multiline-run))))
 
 (defun lua--automark-multiline-cleanup ()
   "Disable automatical multiline construct marking"
@@ -1297,6 +1297,10 @@ If END is nil, stop at `end-of-buffer'."
     (cancel-timer lua-automark-multiline-timer)
     (setq lua-automark-multiline-timer nil)))
 
+(defun lua--automark-multiline-run ()
+  (when (<= (buffer-size) lua-automark-multiline-maxsize)
+    (lua-mark-all-multiline-literals)))
+
 (defun lua--customize-set-automark-multiline-interval (symbol value)
   (set symbol value)
   (dolist (buf (buffer-list))
@@ -1310,6 +1314,11 @@ If END is nil, stop at `end-of-buffer'."
   :type 'integer
   :set 'lua--customize-set-automark-multiline-interval)
 
+(defcustom lua-automark-multiline-maxsize 100000
+  "Maximum buffer size for which lua-mode will mark multiline literals 
automatically."
+  :group 'lua
+  :type 'integer)
+
 (provide 'lua-mode)
 
 ;;; lua-mode.el ends here