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

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

[nongnu] elpa/spell-fu 5915e0ae2a 24/86: Cleanup: use safer sharp-quoted


From: ELPA Syncer
Subject: [nongnu] elpa/spell-fu 5915e0ae2a 24/86: Cleanup: use safer sharp-quoted function names
Date: Thu, 7 Jul 2022 12:03:40 -0400 (EDT)

branch: elpa/spell-fu
commit 5915e0ae2a46c828b058f03c35f5cb3d8c131985
Author: Campbell Barton <ideasman42@gmail.com>
Commit: Campbell Barton <ideasman42@gmail.com>

    Cleanup: use safer sharp-quoted function names
---
 spell-fu.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/spell-fu.el b/spell-fu.el
index cb7dc2f3f1..ef6107f6e5 100644
--- a/spell-fu.el
+++ b/spell-fu.el
@@ -330,7 +330,7 @@ save some time by not spending time reading it back."
       (with-temp-buffer
         (insert-file-contents-literally words-file)
         (setq word-table
-          (make-hash-table :test 'equal :size (count-lines (point-min) 
(point-max))))
+          (make-hash-table :test #'equal :size (count-lines (point-min) 
(point-max))))
         (while (not (eobp))
           (let ((l (buffer-substring-no-properties (line-beginning-position) 
(line-end-position))))
             ;; Value of 't' is just for simplicity, it's no used except for 
check the item exists.
@@ -507,12 +507,12 @@ Argument FACES-EXCLUDE faces to check POS excludes or 
ignored when nil."
   ;; because we want the font faces (comments, string etc) to be set so
   ;; the spell checker can read these values which may include/exclude words.
   (spell-fu--with-add-hook-depth-override 100
-    (jit-lock-register 'spell-fu--font-lock-fontify-region)))
+    (jit-lock-register #'spell-fu--font-lock-fontify-region)))
 
 (defun spell-fu--immediate-disable ()
   "Disable immediate spell checking."
   (spell-fu--remove-overlays)
-  (jit-lock-unregister 'spell-fu--font-lock-fontify-region))
+  (jit-lock-unregister #'spell-fu--font-lock-fontify-region))
 
 
 ;; ---------------------------------------------------------------------------
@@ -588,7 +588,7 @@ range POINT-START to POINT-END. Otherwise remove all 
overlays."
   "Add the global idle timer."
   (unless spell-fu--idle-timer
     (setq spell-fu--idle-timer
-      (run-with-idle-timer spell-fu-idle-delay t 
'spell-fu--idle-handle-pending-ranges))))
+      (run-with-idle-timer spell-fu-idle-delay t 
#'spell-fu--idle-handle-pending-ranges))))
 
 (defun spell-fu--idle-timer-disable ()
   "Remove the global idle timer."
@@ -603,12 +603,12 @@ range POINT-START to POINT-END. Otherwise remove all 
overlays."
   ;; Nevertheless, this avoids the possibility of spell checking
   ;; running before font-faces have been set.
   (spell-fu--with-add-hook-depth-override 100
-    (jit-lock-register 'spell-fu--idle-font-lock-region-pending))
+    (jit-lock-register #'spell-fu--idle-font-lock-region-pending))
   (spell-fu--idle-timer-enable))
 
 (defun spell-fu--idle-disable ()
   "Disable the idle style of updating."
-  (jit-lock-unregister 'spell-fu--idle-font-lock-region-pending)
+  (jit-lock-unregister #'spell-fu--idle-font-lock-region-pending)
   (spell-fu--idle-timer-disable)
   (spell-fu--idle-remove-overlays))
 



reply via email to

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