mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-20 12:40:56 -08:00
Code Issues Projects Releases Wiki Activity

Stub some referenced variables, for Travis

Browse source
This commit is contained in:
John Wiegley 2017-12-05 14:27:49 -08:00
parent b5a0cd4f30
commit 7c3a6cd70b
1 changed files with 18 additions and 16 deletions
Download patch file Download diff file Expand all files Collapse all files

34
test/lisp/use-package/use-package-tests.el
View file

@ -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