From 70c3b4de3ba9978c472800934a1ddddd9990de8a Mon Sep 17 00:00:00 2001
From: Phil Jackson <phil@shellarchive.co.uk>
Date: Fri, 10 Sep 2010 17:32:57 +0100
Subject: [PATCH] Func to add a new key group.

---
 magit-key-mode.el | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/magit-key-mode.el b/magit-key-mode.el
index c476bcf5..929cf4ee 100644
--- a/magit-key-mode.el
+++ b/magit-key-mode.el
@@ -101,6 +101,10 @@
   modify this make sure you reset `magit-key-mode-key-maps' to
   nil.")
 
+(defun magit-key-mode-add-group (name)
+  "Add a new group to `magit-key-mode-key-maps'."
+  (push (list name) magit-key-mode-groups))
+
 (defun magit-key-mode-update-group (for-group thing &rest args)
   "Abstraction for setting values in `magit-key-mode-key-maps'."
   (let* ((options (magit-key-mode-options-for-group for-group))