]> git.eshelyaron.com Git - emacs.git/commitdiff
Move the config-file slot to the base gnus-search-indexed class
authorEric Abrahamsen <eric@ericabrahamsen.net>
Wed, 7 Jun 2017 06:30:24 +0000 (14:30 +0800)
committerEric Abrahamsen <eric@ericabrahamsen.net>
Sat, 10 Jun 2017 04:28:10 +0000 (12:28 +0800)
* lisp/gnus/gnus-search.el (gnus-search-indexed): They pretty much all
  have or can have configuration files.

lisp/gnus/gnus-search.el

index 62af67497298f22749636fa456002a120e3744e8..661f60ab8e1f48d68fad99f85dce081e8a7a1ff8 100644 (file)
@@ -922,6 +922,11 @@ quirks.")
     :type string
     :documentation
     "The executable used for indexing and searching.")
+   (config-file
+    :init-arg :config-file
+    :type string
+    :custom file
+    :documentation "Location of the config file, if any.")
    (prefix
     :initarg :prefix
     :type string
@@ -963,9 +968,7 @@ quirks.")
                    gnus-search-swish-e-raw-queries-p)
 
 (defclass gnus-search-swish++ (gnus-search-indexed)
-  ((config-file
-    :init-arg :config-file
-    :type string)))
+  nil)
 
 (eieio-oset-default 'gnus-search-swish++ 'program
                    gnus-search-swish++-program)
@@ -983,10 +986,7 @@ quirks.")
                    gnus-search-swish++-raw-queries-p)
 
 (defclass gnus-search-mairix (gnus-search-indexed)
-  ((config-file
-    :initarg :config-file
-    :type string
-    :custom file)))
+  nil)
 
 (eieio-oset-default 'gnus-search-mairix 'program
                    gnus-search-mairix-program)
@@ -1025,9 +1025,7 @@ quirks.")
                    gnus-search-namazu-raw-queries-p)
 
 (defclass gnus-search-notmuch (gnus-search-indexed)
-  ((config-file
-    :init-arg :config-file
-    :type string)))
+  nil)
 
 (eieio-oset-default 'gnus-search-notmuch 'program
                    gnus-search-notmuch-program)