]> git.eshelyaron.com Git - emacs.git/commitdiff
; * test/lisp/dired-aux-tests.el: remove mistaken unwind-protect
authorMattias Engdegård <mattiase@acm.org>
Wed, 29 Mar 2023 20:16:37 +0000 (22:16 +0200)
committerMattias Engdegård <mattiase@acm.org>
Wed, 29 Mar 2023 20:18:28 +0000 (22:18 +0200)
test/lisp/dired-aux-tests.el

index 5939f4806804f413e93b237b495b395381bc986c..62011d8b0f06b0093162e6711df960ebb240bcea 100644 (file)
            (setq to-mv
                  (expand-file-name
                   "foo-mv" (file-name-as-directory (expand-file-name "qux" ,foo))))
-           (unwind-protect
-               (if ,yes-or-no
-                   (cl-letf (((symbol-function 'yes-or-no-p)
-                              (lambda (_prompt) (eq ,yes-or-no 'yes))))
-                     ,@body)
-                 ,@body)))))))
+           (if ,yes-or-no
+               (cl-letf (((symbol-function 'yes-or-no-p)
+                          (lambda (_prompt) (eq ,yes-or-no 'yes))))
+                 ,@body)
+             ,@body))))))
 
 (ert-deftest dired-test-bug28834 ()
   "test for https://debbugs.gnu.org/28834 ."