branch: elpa/casual
commit 6f5933bee9979e238db4c550905ba2d06d56e897
Author: Charles Choi <[email protected]>
Commit: Charles Choi <[email protected]>

    Use binding "C" for "Calendar Group" menu item in Calendar Settings
    
    - Changes initial implementation from "G" binding.
---
 docs/images/casual-calendar-settings-menu.png | Bin 370442 -> 236630 bytes
 lisp/casual-calendar-settings.el              |   2 +-
 tests/test-casual-calendar-settings.el        |   2 +-
 3 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/docs/images/casual-calendar-settings-menu.png 
b/docs/images/casual-calendar-settings-menu.png
index 66c03a0c9a..e1a14865c8 100644
Binary files a/docs/images/casual-calendar-settings-menu.png and 
b/docs/images/casual-calendar-settings-menu.png differ
diff --git a/lisp/casual-calendar-settings.el b/lisp/casual-calendar-settings.el
index 17b91c0df0..df39c13b95 100644
--- a/lisp/casual-calendar-settings.el
+++ b/lisp/casual-calendar-settings.el
@@ -33,7 +33,7 @@ Customize settings for Calendar and Diary modes."
 
   ["Calendar"
    ["Customize"
-    ("G" "Calendar Group" casual-calendar--customize-calendar-group)
+    ("C" "Calendar Group" casual-calendar--customize-calendar-group)
     ("H" "Mark Holidays" casual-calendar--customize-calendar-mark-holidays-flag
      :description (lambda ()
                     (casual-lib-checkbox-label
diff --git a/tests/test-casual-calendar-settings.el 
b/tests/test-casual-calendar-settings.el
index d4a468c6d4..66b5eb7afc 100644
--- a/tests/test-casual-calendar-settings.el
+++ b/tests/test-casual-calendar-settings.el
@@ -33,7 +33,7 @@
     (casualt-calendar-setup)
     (cl-letf ()
       (let ((test-vectors
-             '((:binding "G" :command 
casual-calendar--customize-calendar-group)
+             '((:binding "C" :command 
casual-calendar--customize-calendar-group)
                (:binding "H" :command 
casual-calendar--customize-calendar-mark-holidays-flag)
                (:binding "v" :command 
casual-calendar--customize-calendar-move-hook)
                (:binding "N" :command 
casual-calendar--customize-calendar-location-name)

Reply via email to