emacs-diffs
[Top][All Lists]
Advanced

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

master 1dd8a00325: Fix Eshell predicate tests when running from 'make ch


From: Lars Ingebrigtsen
Subject: master 1dd8a00325: Fix Eshell predicate tests when running from 'make check'
Date: Sun, 17 Apr 2022 15:51:55 -0400 (EDT)

branch: master
commit 1dd8a003253db74ccb724b5f0573fb2005fac07c
Author: Jim Porter <jporterbugs@gmail.com>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Fix Eshell predicate tests when running from 'make check'
    
    * test/lisp/eshell/em-pred-tests.el (eshell-partial-let-func): Get
    original function after macro-expansion.
---
 test/lisp/eshell/em-pred-tests.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/test/lisp/eshell/em-pred-tests.el 
b/test/lisp/eshell/em-pred-tests.el
index fbf8945215..7f88ac4475 100644
--- a/test/lisp/eshell/em-pred-tests.el
+++ b/test/lisp/eshell/em-pred-tests.el
@@ -95,13 +95,13 @@ behavior for real files.
   `(cl-letf
        ,(mapcar
          (lambda (override)
-           (let ((orig-function (symbol-function (car override))))
-             `((symbol-function #',(car override))
+           `((symbol-function #',(car override))
+             (let ((orig-function (symbol-function #',(car override))))
                (lambda (file &rest rest)
                  (apply
                   (if (and (stringp file) (string-prefix-p "/fake/" file))
                       ,(cadr override)
-                    ,orig-function)
+                    orig-function)
                   file rest)))))
          overrides)
      ,@body))



reply via email to

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