summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn Wiegley <johnw@newartisans.com>2017-12-05 14:27:49 -0800
committerJohn Wiegley <johnw@newartisans.com>2017-12-05 14:27:49 -0800
commit7c3a6cd70b4ad73852eed7c59077d96762637930 (patch)
tree681a762d6821121ddca1754224c626002cb91961
parentb5a0cd4f30798a535b4a71241ed86e3c2b22fb4a (diff)
downloademacs-7c3a6cd70b.tar.gz
Stub some referenced variables, for Travis
-rw-r--r--test/lisp/use-package/use-package-tests.el34
1 files changed, 18 insertions, 16 deletions
diff --git a/test/lisp/use-package/use-package-tests.el b/test/lisp/use-package/use-package-tests.el
index a47188f8ecc..c040c89654e 100644
--- a/test/lisp/use-package/use-package-tests.el
+++ b/test/lisp/use-package/use-package-tests.el
@@ -1664,22 +1664,24 @@
`(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