]> git.eshelyaron.com Git - emacs.git/commitdiff
Stub some referenced variables, for Travis
authorJohn Wiegley <johnw@newartisans.com>
Tue, 5 Dec 2017 22:27:49 +0000 (14:27 -0800)
committerJohn Wiegley <johnw@newartisans.com>
Tue, 5 Dec 2017 22:27:49 +0000 (14:27 -0800)
test/lisp/use-package/use-package-tests.el

index a47188f8ecc7178769756968a96b28164baf5852..c040c89654e6b4b65dbd2bb5ddbf628c06068d6b 100644 (file)
    `(bind-key "C-c C-r" #'org-ref-helm-insert-cite-link override-global-map nil)))
 
 (ert-deftest use-package-test/560 ()
-  (match-expansion
-   (use-package notmuch
-     :preface (setq-default notmuch-command (executable-find "notmuch"))
-     :if notmuch-command
-     :requires foo
-     :load-path "my-load-path"
-     :defines var)
-   `(progn
-      (eval-and-compile
-        (add-to-list 'load-path "/Users/johnw/.emacs.d/my-load-path"))
-      (when (featurep 'foo)
-        (eval-and-compile
-          (setq-default notmuch-command
-                        (executable-find "notmuch")))
-        (when (symbol-value 'notmuch-command)
-          (require 'notmuch nil nil))))))
+  (flet ((executable-find (name)))
+    (let (notmuch-command)
+      (match-expansion
+       (use-package notmuch
+         :preface (setq-default notmuch-command (executable-find "notmuch"))
+         :if notmuch-command
+         :requires foo
+         :load-path "my-load-path"
+         :defines var)
+       `(progn
+          (eval-and-compile
+            (add-to-list 'load-path "/Users/johnw/.emacs.d/my-load-path"))
+          (when (featurep 'foo)
+            (eval-and-compile
+              (setq-default notmuch-command
+                            (executable-find "notmuch")))
+            (when (symbol-value 'notmuch-command)
+              (require 'notmuch nil nil))))))))
 
 (ert-deftest bind-key/:prefix-map ()
   (match-expansion