emacs-elpa-diffs
[Top][All Lists]
Advanced

[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



reply via email to

[Prev in Thread] Current Thread [Next in Thread]