Sync up with Gnus 5.6.27.

[elisp/gnus.git-] / lisp / gnus-salt.el

diff --git a/lisp/gnus-salt.el b/lisp/gnus-salt.el
index 00ca021..1f881cf 100644 (file)
--- a/lisp/gnus-salt.el
+++ b/lisp/gnus-salt.el
@@ -242,7 +242,7 @@ This must be bound to a button-down mouse event."
     (let (event end end-point last-end-point (end-of-range (point)))
       (track-mouse
        (while (progn
-               (setq event (read-event))
+               (setq event (gnus-read-event-char))
                (or (mouse-movement-p event)
                    (eq (car-safe event) 'switch-frame)))
         (if (eq (car-safe event) 'switch-frame)
@@ -379,7 +379,8 @@ This must be bound to a button-down mouse event."
   "If non-nil, minimize the tree buffer window.
 If a number, never let the tree buffer grow taller than that number of
 lines."
-  :type 'boolean
+  :type '(choice boolean
+                integer)
   :group 'gnus-summary-tree)
 
 (defcustom gnus-selected-tree-face 'modeline