mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-15 10:30:25 -08:00
Add a clarifying test for
GitHub-reference: https://github.com/jwiegley/use-package/issues/482
This commit is contained in:
parent
ec84ed0dfb
commit
3850281f88
1 changed files with 16 additions and 0 deletions
|
|
@ -1638,6 +1638,22 @@
|
|||
(bind-key "f" #'w3m-lnum-print-this-url w3m-y-prefix-map nil)
|
||||
(bind-key "t" #'w3m-print-this-url w3m-y-prefix-map nil)))))
|
||||
|
||||
(ert-deftest use-package-test/482 ()
|
||||
(match-expansion
|
||||
(use-package simple
|
||||
:bind-keymap ("C-t " . my/transpose-map)
|
||||
:bind (:map my/transpose-map
|
||||
("w" . transpose-words)))
|
||||
`(progn
|
||||
(unless (fboundp 'transpose-words)
|
||||
(autoload #'transpose-words "simple" nil t))
|
||||
(bind-key "C-t "
|
||||
#'(lambda nil
|
||||
(interactive)
|
||||
(use-package-autoload-keymap 'my/transpose-map 'simple nil)))
|
||||
(bind-keys :package simple :map my/transpose-map
|
||||
("w" . transpose-words)))))
|
||||
|
||||
(ert-deftest use-package-test/538 ()
|
||||
(match-expansion
|
||||
(use-package mu4e
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue