[Emacs-diffs] /srv/bzr/emacs/trunk r109309: gnus.el (gnus-valid-select-methods): Fix custom type

[Katsumi Yamaoka]

------------------------------------------------------------
revno: 109309
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Tue 2012-07-31 01:39:58 +0000
message:
  gnus.el (gnus-valid-select-methods): Fix custom type
modified:
  lisp/gnus/ChangeLog
  lisp/gnus/gnus.el

=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog       2012-07-30 10:13:52 +0000
+++ b/lisp/gnus/ChangeLog       2012-07-31 01:39:58 +0000
@@ -1,3 +1,7 @@
+2012-07-31  Katsumi Yamaoka  <address@hidden>
+
+       * gnus.el (gnus-valid-select-methods): Fix custom type.
+
 2012-07-29  Teodor Zlatanov  <address@hidden>
 
        * auth-source.el (auth-sources, auth-source-backend-parse)

=== modified file 'lisp/gnus/gnus.el'
--- a/lisp/gnus/gnus.el 2012-07-24 22:17:17 +0000
+++ b/lisp/gnus/gnus.el 2012-07-31 01:39:58 +0000
@@ -1647,12 +1647,13 @@
                                             (const :format "%v " mail)
                                             (const :format "%v " none)
                                             (const post-mail))
-                       (checklist :inline t
+                       (checklist :inline t :greedy t
                                   (const :format "%v " address)
                                   (const :format "%v " prompt-address)
                                   (const :format "%v " physical-address)
-                                  (const :format "%v " virtual)
-                                  (const respool))))
+                                  (const virtual)
+                                  (const :format "%v " respool)
+                                  (const server-marks))))
   :version "24.1")
 
 (defun gnus-redefine-select-method-widget ()