emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] scratch/gnus-search 7959745 4/4: Move the config-file slot


From: Eric Abrahamsen
Subject: [Emacs-diffs] scratch/gnus-search 7959745 4/4: Move the config-file slot to the base gnus-search-indexed class
Date: Sat, 10 Jun 2017 00:32:06 -0400 (EDT)

branch: scratch/gnus-search
commit 79597457a9edca56281db14d6888879b4c84fc61
Author: Eric Abrahamsen <address@hidden>
Commit: Eric Abrahamsen <address@hidden>

    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.
---
 lisp/gnus/gnus-search.el | 18 ++++++++----------
 1 file changed, 8 insertions(+), 10 deletions(-)

diff --git a/lisp/gnus/gnus-search.el b/lisp/gnus/gnus-search.el
index 62af674..661f60a 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)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]