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

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

[nongnu] elpa/spell-fu bddea99f9c 17/21: Fix #36: byte compilation error


From: ELPA Syncer
Subject: [nongnu] elpa/spell-fu bddea99f9c 17/21: Fix #36: byte compilation error with Emacs 28.2
Date: Sat, 7 Jan 2023 07:12:29 -0500 (EST)

branch: elpa/spell-fu
commit bddea99f9cffdde8cdeb2bf92fb90af83554d059
Author: Campbell Barton <ideasman42@gmail.com>
Commit: Campbell Barton <ideasman42@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)))
 
 ;; ---------------------------------------------------------------------------



reply via email to

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