diff options
author | John Wiegley <johnw@newartisans.com> | 2017-12-04 15:43:10 -0800 |
---|---|---|
committer | John Wiegley <johnw@newartisans.com> | 2017-12-04 15:43:10 -0800 |
commit | 2790bfc00618046d44a9c4817f1128ad2986fc10 (patch) | |
tree | a1c0172d39bf911a2c848cf5190db260967207c5 | |
parent | 62d33b2143018e5ad23f0f34c84250c950f0d71b (diff) | |
download | emacs-2790bfc006.tar.gz |
Add a bind-key test
-rw-r--r-- | test/lisp/use-package/use-package-tests.el | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/test/lisp/use-package/use-package-tests.el b/test/lisp/use-package/use-package-tests.el index 51a57edb7d2..76e0be5105b 100644 --- a/test/lisp/use-package/use-package-tests.el +++ b/test/lisp/use-package/use-package-tests.el @@ -1469,6 +1469,15 @@ (ignore (bind-keys :package mu4e ("<f9>" . mu4e)))))) +(ert-deftest bind-key/:prefix-map () + (match-expansion + (bind-keys :prefix "<f1>" + :prefix-map my/map) + `(progn + (defvar my/map) + (define-prefix-command 'my/map) + (bind-key "<f1>" 'my/map nil nil)))) + ;; Local Variables: ;; indent-tabs-mode: nil ;; no-byte-compile: t |