Fix 'gnus-select-method' custom type

* lisp/gnus/gnus.el (gnus-redefine-select-method-widget): Cater
for the 'gnus-search-engine' configuration variable, which takes
2 args instead of 1.   (Bug#74759)

diff --git a/lisp/gnus/gnus.el b/lisp/gnus/gnus.el
index f1fc129a5050ebfbffedde6ba52baa20746c6b81..1334fa26afaa7e5cf0ed08f271ebb36cc5545928 100644 (file)
--- a/lisp/gnus/gnus.el
+++ b/lisp/gnus/gnus.el
@@ -1402,9 +1402,14 @@ this variable.  I think."
            (string :tag "Address")
            (repeat :tag "Options"
                    :inline t
-                   (list :format "%v"
-                         variable
-                         (sexp :tag "Value"))))))
+                    (radio
+                    (list :tag "Single var" :format "%v"
+                          variable
+                          (sexp :tag "Value"))
+                     (list :tag "Multiple var" :format "%v"
+                          variable
+                           variable
+                          (sexp :tag "Value")))))))
 
 (gnus-redefine-select-method-widget)