X-Git-Url: https://git.notmuchmail.org/git?a=blobdiff_plain;f=doc%2Felisp.py;h=1b0392e6528c71f29de10f9e9883c6075ec0012b;hb=3db892f43b4ac333a09dd05c8f230bf3f8d2b9e9;hp=642ea9ae2eacb89388b4bd50584d864cba2f58fe;hpb=b2d07209713cb872117cb7701ac5133bb183744a;p=notmuch

diff --git a/doc/elisp.py b/doc/elisp.py
index 642ea9ae..1b0392e6 100644
--- a/doc/elisp.py
+++ b/doc/elisp.py
@@ -110,6 +110,13 @@ class EmacsLispSymbol(ObjectDescription):
         'defface': 'face'
     }
 
+    category_for_objtype = {
+        'defcustom': 'Emacs variable (customizable)',
+        'defconst': 'Emacs constant',
+        'defvar': 'Emacs variable',
+        'defface': 'Emacs face'
+    }
+
     @property
     def cell(self):
         """The cell in which to store symbol metadata."""
@@ -120,6 +127,11 @@ class EmacsLispSymbol(ObjectDescription):
         """The label for the documented object type."""
         return self.objtype
 
+    @property
+    def category(self):
+        """Index category"""
+        return self.category_for_objtype[self.objtype]
+
     def handle_signature(self, signature, signode):
         """Create nodes in ``signode`` for the ``signature``.
 
@@ -137,7 +149,7 @@ class EmacsLispSymbol(ObjectDescription):
 
     def _add_index(self, name, target):
         index_text = '{name}; {label}'.format(
-            name=name, label=self.label)
+            name=name, label=self.category)
         self.indexnode['entries'].append(
             ('pair', index_text, target, '', None))
 
@@ -302,7 +314,7 @@ class EmacsLispDomain(Domain):
     """A domain to document Emacs Lisp code."""
 
     name = 'el'
-    label = 'Emacs Lisp'
+    label = ''
 
     object_types = {
         # TODO: Set search prio for object types