[Emacs-diffs] trunk r113831: Fix some custom types

[Glenn Morris]

------------------------------------------------------------
revno: 113831
revision-id: address@hidden
parent: address@hidden
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Tue 2013-08-13 00:18:50 -0700
message:
  Fix some custom types
  
  * gnus/gnus.el (gnus-valid-select-methods): Fix type.
  
  * gnus/nnimap.el (nnimap-request-articles-find-limit): Fix type, version.
  
  * net/shr.el (shr-table-horizontal-line): Fix custom type.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/gnus/ChangeLog            changelog-20091113204419-o5vbwnq5f7feedwu-1433
  lisp/gnus/gnus.el              gnus.el-20091113204419-o5vbwnq5f7feedwu-1144
  lisp/gnus/nnimap.el            nnimap.el-20091113204419-o5vbwnq5f7feedwu-1978
  lisp/net/shr.el                shr.el-20101002102929-yfzewk55rsg0mn93-1

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-08-13 02:30:52 +0000
+++ b/lisp/ChangeLog    2013-08-13 07:18:50 +0000
@@ -1,3 +1,7 @@
+2013-08-13  Glenn Morris  <address@hidden>
+
+       * net/shr.el (shr-table-horizontal-line): Fix custom type.
+
 2013-08-13  Stefan Monnier  <address@hidden>
 
        * emacs-lisp/timer.el (timer--time-setter): New function.

=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog       2013-08-12 06:32:15 +0000
+++ b/lisp/gnus/ChangeLog       2013-08-13 07:18:50 +0000
@@ -1,3 +1,9 @@
+2013-08-13  Glenn Morris  <address@hidden>
+
+       * gnus.el (gnus-valid-select-methods): Fix type.
+
+       * nnimap.el (nnimap-request-articles-find-limit): Fix type, version.
+
 2013-08-12  Katsumi Yamaoka  <address@hidden>
 
        * mm-decode.el (mm-display-external): Run a timer for the temp files

=== modified file 'lisp/gnus/gnus.el'
--- a/lisp/gnus/gnus.el 2013-07-23 07:04:24 +0000
+++ b/lisp/gnus/gnus.el 2013-08-13 07:18:50 +0000
@@ -1649,6 +1649,7 @@
                                             (const post-mail))
                        (checklist :inline t :greedy t
                                   (const :format "%v " address)
+                                  (const global)
                                   (const :format "%v " prompt-address)
                                   (const :format "%v " physical-address)
                                   (const virtual)

=== modified file 'lisp/gnus/nnimap.el'
--- a/lisp/gnus/nnimap.el       2013-07-02 10:38:58 +0000
+++ b/lisp/gnus/nnimap.el       2013-08-13 07:18:50 +0000
@@ -130,8 +130,8 @@
 
 (defcustom nnimap-request-articles-find-limit nil
   "Limit the number of articles to look for after moving an article."
-  :type 'integer
-  :version "24.3"
+  :type '(choice (const nil) integer)
+  :version "24.4"
   :group 'nnimap)
 
 (defvar nnimap-process nil)

=== modified file 'lisp/net/shr.el'
--- a/lisp/net/shr.el   2013-08-06 22:05:33 +0000
+++ b/lisp/net/shr.el   2013-08-13 07:18:50 +0000
@@ -59,7 +59,7 @@
   "Character used to draw horizontal table lines.
 If nil, don't draw horizontal table lines."
   :group 'shr
-  :type 'character)
+  :type '(choice (const nil) character))
 
 (defcustom shr-table-vertical-line ?\s
   "Character used to draw vertical table lines."