[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/buttercup e0ebdd6bb8 1/3: Define keymap buttercup-minor-mo
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/buttercup e0ebdd6bb8 1/3: Define keymap buttercup-minor-mode-map for buttercup-minor-mode |
Date: |
Sun, 4 Dec 2022 17:58:22 -0500 (EST) |
branch: elpa/buttercup
commit e0ebdd6bb840ed365d6eba13fda5a3ee4b983412
Author: Ola Nilsson <ola.nilsson@gmail.com>
Commit: Ola Nilsson <ola.nilsson@gmail.com>
Define keymap buttercup-minor-mode-map for buttercup-minor-mode
Just an empty keymap for now.
Fixes #227.
---
buttercup.el | 1 +
tests/test-buttercup.el | 4 +++-
2 files changed, 4 insertions(+), 1 deletion(-)
diff --git a/buttercup.el b/buttercup.el
index 37de9df532..3aad9bbe31 100644
--- a/buttercup.el
+++ b/buttercup.el
@@ -2085,6 +2085,7 @@ With buttercup minor mode active the following is
activated:
- `describe' and `it' forms are available from `imenu' for
quicker access."
:lighter " ❀"
+ :keymap (make-sparse-keymap)
(let ((font-lock-form '(("(\\(describe\\|buttercup-define-matcher\\|it\\) "
1 'font-lock-keyword-face)))
(imenu-forms '(("Test Suites" "\\((describe\\_>
+\\)\"\\(\\_<.+\\_>\\)\"" 2)
diff --git a/tests/test-buttercup.el b/tests/test-buttercup.el
index a16b606ec7..4d3a177a37 100644
--- a/tests/test-buttercup.el
+++ b/tests/test-buttercup.el
@@ -2115,7 +2115,9 @@ text properties using `ansi-color-apply'."
(expect (cl-caadr suites) :to-equal "A test suite")
(expect specs :to-be-truthy)
(expect (length (cdr specs)) :to-equal 1)
- (expect (cl-caadr specs) :to-equal "should fontify special
keywords")))))
+ (expect (cl-caadr specs) :to-equal "should fontify special
keywords"))))
+ (it "should define `buttercup-minor-mode-map'"
+ (expect (boundp 'buttercup-minor-mode-map))))
;;;;;;;;;;;;;;;;;;;
;;; Stale elc files