From: Eric Abrahamsen <eric@ericabrahamsen.net>
Date: Wed, 7 Jun 2017 06:30:24 +0000 (+0800)
Subject: Move the config-file slot to the base gnus-search-indexed class
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=79597457a9edca56281db14d6888879b4c84fc61;p=emacs.git

Move the config-file slot to the base gnus-search-indexed class

* lisp/gnus/gnus-search.el (gnus-search-indexed): They pretty much all
  have or can have configuration files.
---

diff --git a/lisp/gnus/gnus-search.el b/lisp/gnus/gnus-search.el
index 62af6749729..661f60ab8e1 100644
--- a/lisp/gnus/gnus-search.el
+++ b/lisp/gnus/gnus-search.el
@@ -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)