mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-26 15:21:51 -08:00
Code Issues Projects Releases Wiki Activity

Pre-expand lexical-let, since otherwise it requires cl to be loaded

Browse source 
Fixes https://github.com/jwiegley/use-package/issues/571
This commit is contained in:
John Wiegley 2017-12-06 16:56:25 -08:00
parent 71fc224961
commit 7cc17cee8f
2 changed files with 16 additions and 18 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -1213,8 +1213,7 @@
(eval-after-load 'quux
'(if ,_ ,_
(setq ,_ t)
(setq ,_ (require 'foo nil nil)))))))
))
(setq ,_ (require 'foo nil nil)))))))))
(ert-deftest use-package-test/:after-7 ()
(match-expansion
@ -1228,8 +1227,7 @@
(eval-after-load 'bow
'(if ,_ ,_
(setq ,_ t)
(setq ,_ (require 'foo nil nil)))))
))
(setq ,_ (require 'foo nil nil)))))))
(ert-deftest use-package-test/:after-8 ()
(match-expansion
@ -1254,8 +1252,7 @@
(eval-after-load 'quux
'(if ,_ ,_
(setq ,_ t)
(setq ,_ (require 'foo nil nil)))))))
))
(setq ,_ (require 'foo nil nil)))))))))
(ert-deftest use-package-test/:after-9 ()
(match-expansion
@ -1270,8 +1267,7 @@
'(eval-after-load 'bow
'(if ,_ ,_
(setq ,_ t)
(setq ,_ (require 'foo nil nil))))))
))
(setq ,_ (require 'foo nil nil))))))))
(ert-deftest use-package-test/:after-10 ()
(match-expansion
@ -1289,8 +1285,7 @@
(eval-after-load 'baz
'(if ,_ ,_
(setq ,_ t)
(setq ,_ (require 'foo nil nil)))))
))
(setq ,_ (require 'foo nil nil)))))))
(ert-deftest use-package-test/:demand-1 ()
(match-expansion