Fix warnings in Emacs 28.2

(cherry picked from commit 0f1a5505a354532f531fee80811baf2186de5289)

diff --git a/misc/fuel/fuel-log.el b/misc/fuel/fuel-log.el
index bff72c1b8462ca1c878a54faee584006260b5a31..d8188c9fc1715dc3c5647f8677b869dc384a6462 100644 (file)
--- a/misc/fuel/fuel-log.el
+++ b/misc/fuel/fuel-log.el
@@ -42,7 +42,7 @@
   (buffer-disable-undo)
   (setq-local comint-redirect-subvert-readonly t)
   (add-hook 'after-change-functions
-            '(lambda (b e len)
+            #'(lambda (b e len)
                (let ((inhibit-read-only t))
                  (when (> b fuel-log--max-buffer-size)
                    (delete-region (point-min) b))))

diff --git a/misc/fuel/fuel-xref.el b/misc/fuel/fuel-xref.el
index de05e265ae46fc6c525eef911c90b4b1089d88fe..a2d15852335c15c5621c29575c1f47eb40025742 100644 (file)
--- a/misc/fuel/fuel-xref.el
+++ b/misc/fuel/fuel-xref.el
@@ -114,7 +114,7 @@ cursor at the first ocurrence of the used word."
   (newline))
 
 (defun fuel-xref--insert-vocab-words (vocab-def xrefs)
-  (destructuring-bind (vocab file) vocab-def
+  (cl-destructuring-bind (vocab file) vocab-def
     (insert "in ")
     (fuel-xref--insert-link (or vocab "unknown vocabs") file 1)
     (let ((count-str (fuel-xref--pluralize-count (length xrefs) "word")))
@@ -144,7 +144,7 @@ cursor at the first ocurrence of the used word."
          (title-str (format "%s %s %s:\n\n" count-str cc search-str)))
     (erase-buffer)
     (insert title-str)
-    (loop for (vocab _ file line-num) in xrefs do
+    (cl-loop for (vocab _ file line-num) in xrefs do
           (insert "  ")
           (fuel-xref--insert-link vocab file line-num)
           (newline)))