From: Gustav Hållberg Date: Sun, 21 Dec 2008 10:55:51 +0000 (+0100) Subject: stgit.el: Add an stgit customization group X-Git-Tag: v0.15-rc1~76 X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/stgit/commitdiff_plain/8f40753a9854938554c9cabcb296be077fd7a3eb stgit.el: Add an stgit customization group This makes it easier to customize faces and (future) variables. Signed-off-by: Gustav Hållberg Signed-off-by: Karl Hasselström --- diff --git a/contrib/stgit.el b/contrib/stgit.el index 0f47d4d..503caf7 100644 --- a/contrib/stgit.el +++ b/contrib/stgit.el @@ -113,28 +113,36 @@ (defun stgit-reload () (goto-line curline))) (stgit-refresh-git-status)) +(defgroup stgit nil + "A user interface for the StGit patch maintenance tool." + :group 'tools) + (defface stgit-description-face '((((background dark)) (:foreground "tan")) (((background light)) (:foreground "dark red"))) - "The face used for StGit desriptions") + "The face used for StGit descriptions" + :group 'stgit) (defface stgit-top-patch-face '((((background dark)) (:weight bold :foreground "yellow")) (((background light)) (:weight bold :foreground "purple")) (t (:weight bold))) - "The face used for the top patch names") + "The face used for the top patch names" + :group 'stgit) (defface stgit-applied-patch-face '((((background dark)) (:foreground "light yellow")) (((background light)) (:foreground "purple")) (t ())) - "The face used for applied patch names") + "The face used for applied patch names" + :group 'stgit) (defface stgit-unapplied-patch-face '((((background dark)) (:foreground "gray80")) (((background light)) (:foreground "orchid")) (t ())) - "The face used for unapplied patch names") + "The face used for unapplied patch names" + :group 'stgit) (defun stgit-expand-patch (patchsym) (save-excursion