diff options
Diffstat (limited to 'tests/test-pearl-keymap.el')
| -rw-r--r-- | tests/test-pearl-keymap.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/test-pearl-keymap.el b/tests/test-pearl-keymap.el index 97d8440..260b6fa 100644 --- a/tests/test-pearl-keymap.el +++ b/tests/test-pearl-keymap.el @@ -66,9 +66,9 @@ Walks MAP looking for a labeled binding (\"label\" . COMMAND)." (should (keymapp (lookup-key pearl-prefix-map (kbd "n")))) (should (keymapp (lookup-key pearl-prefix-map (kbd "d"))))) -(ert-deftest test-pearl-prefix-map-no-delete-comment-yet () - "Delete-comment is not bound -- the command is a separate task." - (should-not (commandp (lookup-key pearl-prefix-map (kbd "d c"))))) +(ert-deftest test-pearl-prefix-map-delete-comment-bound () + "Delete-comment fills the d c slot under the delete prefix." + (should (eq 'pearl-delete-current-comment (lookup-key pearl-prefix-map (kbd "d c"))))) (ert-deftest test-pearl-prefix-map-not-bound-at-load () "Loading pearl does not bind the commands to any active key (opt-in)." |