Fix #111

8 files changed, 35 insertions, 9 deletions

diff --git a/sx-cache.el b/sx-cache.el
index b9f65ba..51c2267 100644
--- a/sx-cache.el
+++ b/sx-cache.el
@@ -32,7 +32,7 @@
   (expand-file-name ".sx" user-emacs-directory)
   "Directory containing cached data."
   :type 'directory
-  :group 'sx-cache)
+  :group 'sx)
 
 (defun sx-cache--ensure-sx-cache-directory-exists ()
   "Ensure `sx-cache-directory' exists."
diff --git a/sx-question-list.el b/sx-question-list.el
index ae2177a..9709b99 100644
--- a/sx-question-list.el
+++ b/sx-question-list.el
@@ -30,6 +30,18 @@
 (require 'sx-question-mode)
 (require 'sx-favorites)
 
+(defgroup sx-question-list nil
+  "Customization group for sx-question-list."
+  :prefix "sx-question-list-"
+  :tag "SX Question List"
+  :group 'sx)
+
+(defgroup sx-question-list-faces nil
+  "Customization group for the faces of `sx-question-list'."
+  :prefix "sx-question-list-"
+  :tag "SX Question List Faces"
+  :group 'sx-question-list)
+
 
 ;;; Customization
 (defcustom sx-question-list-height 12
diff --git a/sx-question-mode.el b/sx-question-mode.el
index 8d806d0..3cc06b5 100644
--- a/sx-question-mode.el
+++ b/sx-question-mode.el
@@ -1,4 +1,4 @@
-;;; sx-question-mode.el --- Creating the buffer that displays questions  -*- lexical-binding: t; -*-
+;;; sx-question-mode.el --- Creating the buffer that displays questions
 
 ;; Copyright (C) 2014  Artur Malabarba
 
@@ -31,11 +31,13 @@
 (defgroup sx-question-mode nil
   "Customization group for sx-question-mode."
   :prefix "sx-question-mode-"
+  :tag "SX Question Mode"
   :group 'sx)
 
 (defgroup sx-question-mode-faces nil
   "Customization group for the faces of `sx-question-mode'."
   :prefix "sx-question-mode-"
+  :tag "SX Question Mode Faces"
   :group 'sx-question-mode)
 
 
@@ -616,3 +618,7 @@ query the api."
 
 (provide 'sx-question-mode)
 ;;; sx-question-mode.el ends here
+
+;; Local Variables:
+;; lexical-binding: t
+;; End:
diff --git a/sx-request.el b/sx-request.el
index 6b09988..a98af5a 100644
--- a/sx-request.el
+++ b/sx-request.el
@@ -71,7 +71,7 @@
   "gunzip"
   "Program used to unzip the response if it is compressed.
 This program must accept compressed data on standard input."
-  :group 'sx-request
+  :group 'sx
   :type 'string)
 
 (defvar sx-request-remaining-api-requests
@@ -85,7 +85,7 @@ Set by `sx-request-make'.")
 After `sx-request-remaining-api-requests' drops below this
 number, `sx-request-make' will begin printing out the
 number of requests left every time it finishes a call."
-  :group 'sx-request
+  :group 'sx
   :type 'integer)
 
 
diff --git a/sx-site.el b/sx-site.el
index 04b5240..8bd4fc0 100644
--- a/sx-site.el
+++ b/sx-site.el
@@ -57,7 +57,7 @@
   "List of favorite sites.
 Each entry is a string corresponding to a single site's
 api_site_parameter."
-  :group 'sx-site)
+  :group 'sx)
 
 (defun sx-site-get-api-tokens ()
   "Return a list of all known site tokens."
diff --git a/sx-tab.el b/sx-tab.el
index bcf3849..154a90f 100644
--- a/sx-tab.el
+++ b/sx-tab.el
@@ -30,7 +30,7 @@
 (defcustom sx-tab-default-site "emacs"
   "Name of the site to use by default when listing questions."
   :type 'string 
-  :group 'sx-tab)
+  :group 'sx)
 
 (defmacro sx-tab--define (tab pager &optional printer refresher
                               &rest body)
diff --git a/sx-time.el b/sx-time.el
index 8ee214e..e65bb50 100644
--- a/sx-time.el
+++ b/sx-time.el
@@ -57,13 +57,13 @@
   "Format used for dates on a past year.
 See also `sx-time-date-format'."
   :type 'string
-  :group 'sx-time)
+  :group 'sx)
 
 (defcustom sx-time-date-format "%H:%M - %d %b"
   "Format used for dates on this year.
 See also `sx-time-date-format-year'."
   :type 'string
-  :group 'sx-time)
+  :group 'sx)
 
 (defun sx-time-seconds-to-date (seconds)
   "Return the integer SECONDS as a date string."
diff --git a/sx.el b/sx.el
index 18cf166..0fe98c7 100644
--- a/sx.el
+++ b/sx.el
@@ -1,4 +1,4 @@
-;;; sx.el --- Core functions of the sx package.      -*- lexical-binding: t; -*-
+;;; sx.el --- core functions of the sx package.
 
 ;; Copyright (C) 2014  Sean Allred
 
@@ -30,6 +30,13 @@
 
 (defconst sx-version "0.1" "Version of the `sx' package.")
 
+(defgroup sx nil
+  "Customization group for sx-question-mode."
+  :prefix "sx-"
+  :tag "SX"
+  :group 'applications)
+
+
 
 ;;; User commands
 (defun sx-version ()
@@ -312,4 +319,5 @@ If FORCE is non-nil, run them even if they've already been run."
 
 ;; Local Variables:
 ;; indent-tabs-mode: nil
+;; lexical-binding: t
 ;; End: