branch: elpa/spell-fu
commit bddea99f9cffdde8cdeb2bf92fb90af83554d059
Author: Campbell Barton <ideasma...@gmail.com>
Commit: Campbell Barton <ideasma...@gmail.com>
Fix #36: byte compilation error with Emacs 28.2
---
spell-fu.el | 10 +++++++---
1 file changed, 7 insertions(+), 3 deletions(-)
diff --git a/spell-fu.el b/spell-fu.el
index db3e4a1b70..63eaf3b936 100644
--- a/spell-fu.el
+++ b/spell-fu.el
@@ -48,6 +48,8 @@
(require 'faces)
;; For variables we read `ispell-personal-dictionary' local dictionary, etc.
(require 'ispell)
+;; For `string-blank-p'.
+(require 'subr-x)
;; ---------------------------------------------------------------------------
@@ -189,12 +191,14 @@ Notes:
;; Developer note, don't use this for logging the checking of individual words,
;; that is far too verbose, this is mainly for checking why dictionaries aren't
;; being properly initialized.
+
(defmacro spell-fu--debug-message (fmt &rest args)
"Debug message logging passing FMT and ARGS to `message'."
- (when spell-fu-debug
+ ;; When emacs 28.2 support is dropped,
+ ;; this can simply check `spell-fu-debug', see: #36.
+ (when (bound-and-true-p spell-fu-debug)
`(apply 'message (list (concat "spell-fu-debug: " ,fmt) ,@args))))
-
;; ---------------------------------------------------------------------------
;; Dictionary Utility Functions
@@ -1634,7 +1638,7 @@ Argument DICT-FILE is the absolute path to the
dictionary."
;;;###autoload
(defun spell-fu-buffer-session-localwords-update ()
"Refresh after changing `spell-fu-buffer-session-localwords'."
- (when spell-fu-mode
+ (when (bound-and-true-p spell-fu-mode)
(spell-fu--buffer-localwords-update-impl)))
;; ---------------------------------------------------------------------------
