Prefer if-let* to if-let (fixes #881)

Author: purcell

lisp/init-lisp.el

@@ -136,8 +136,8 @@ there is no current file, eval the current buffer."
 (defun sanityinc/trust-current-file ()
   "Quickly mark current elisp file as trusted content."
   (interactive)
-  (if-let ((file (and (derived-mode-p 'emacs-lisp-mode)
-                      (buffer-file-name))))
+  (if-let* ((file (and (derived-mode-p 'emacs-lisp-mode)
+                       (buffer-file-name))))
       (progn (push file trusted-content)
              (when (bound-and-true-p flymake-mode)
                (flymake-mode nil)

lisp/init-minibuffer.el

@@ -32,7 +32,7 @@
                          (if (use-region-p)
                              (buffer-substring-no-properties
                               (region-beginning) (region-end))
-                           (if-let ((s (symbol-at-point)))
+                           (if-let* ((s (symbol-at-point)))
                                (symbol-name s)))))
       (consult-ripgrep dir initial))
     (sanityinc/no-consult-preview sanityinc/consult-ripgrep-at-point)