From ec84ed0dfbeebb8683330449aa4e476debd2f72c Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Sat, 9 Dec 2017 16:28:49 -0800 Subject: Fix a scoping issues with multiple occurrences of :bind Fixes https://github.com/jwiegley/use-package/issues/585 --- test/lisp/use-package/use-package-tests.el | 15 +++++++++++++++ 1 file changed, 15 insertions(+) (limited to 'test') diff --git a/test/lisp/use-package/use-package-tests.el b/test/lisp/use-package/use-package-tests.el index 5ba6db8a4b5..5aab6bb1170 100644 --- a/test/lisp/use-package/use-package-tests.el +++ b/test/lisp/use-package/use-package-tests.el @@ -1769,6 +1769,21 @@ t)) (bind-keys :package helm ("C-c d" . helm-mini))))) +(ert-deftest use-package-test/585 () + (match-expansion + (use-package bug + :bind (:map bug-map ("C-a" . alpha)) + :bind (("C-b" . beta))) + `(progn + (unless (fboundp 'alpha) + (autoload #'alpha "bug" nil t)) + (unless (fboundp 'beta) + (autoload #'beta "bug" nil t)) + (bind-keys :package bug :map bug-map + ("C-a" . alpha)) + (bind-keys :package bug + ("C-b" . beta))))) + (ert-deftest bind-key/:prefix-map () (match-expansion (bind-keys :prefix "" -- cgit v1.2.1