[elpa] externals/embark 891aa297aa 4/6: Simplify some double negations

[ELPA Syncer]

branch: externals/embark
commit 891aa297aa74478dc69865fd26daaeaeb4872260
Author: Omar Antolín <omar.antolin@gmail.com>
Commit: Omar Antolín <omar.antolin@gmail.com>

    Simplify some double negations
---
 embark.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/embark.el b/embark.el
index 3d8619ea90..8f5cdd29a2 100644
--- a/embark.el
+++ b/embark.el
@@ -2141,7 +2141,7 @@ Return a plist with keys `:type', `:orig-type', 
`:candidates', and
                       candidates))))
     (append
      (list :orig-type type :orig-candidates candidates)
-     (or (unless (null candidates)
+     (or (when candidates
            (when-let ((transformer (alist-get type embark-transformer-alist)))
              (pcase-let* ((`(,new-type . ,first-cand)
                            (funcall transformer type (car candidates))))
@@ -2567,7 +2567,7 @@ all buffers."
            ;; distinguished from the "single marked file" case by
            ;; returning (list t marked-file) in the latter
            (let ((marked (dired-get-marked-files t nil nil t)))
-             (and (not (null (cdr marked)))
+             (and (cdr marked)
                   (if (eq (car marked) t) (cdr marked) marked)))
            (save-excursion
              (goto-char (point-min))
@@ -3818,7 +3818,7 @@ The advice is self-removing so it only affects ACTION 
once."
 
 (defun embark--allow-edit (&rest _)
   "Allow editing the target."
-  (remove-hook 'post-command-hook 'exit-minibuffer t)
+  (remove-hook 'post-command-hook #'exit-minibuffer t)
   (remove-hook 'post-command-hook 'ivy-immediate-done t))
 
 (defun embark--ignore-target (&rest _)