master c8a49b69ab: ; * lisp/mouse.el (mouse-drag-and-drop-region-scroll-margin): Fix type.

[Po Lu]

branch: master
commit c8a49b69abc0beb7eca4c4ccf18eefc52aaf7cee
Author: Po Lu <luangruo@yahoo.com>
Commit: Po Lu <luangruo@yahoo.com>

    ; * lisp/mouse.el (mouse-drag-and-drop-region-scroll-margin): Fix type.
---
 lisp/mouse.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/mouse.el b/lisp/mouse.el
index 5e56a9e972..3f43b39079 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -102,7 +102,8 @@ point at the click position."
 If the mouse moves this many lines close to the top or bottom of
 a window while dragging text, then that window will be scrolled
 down and up respectively."
-  :type 'integer
+  :type '(choice (const :tag "Don't scroll during mouse movement")
+                 (integer :tag "This many lines from window top or bottom"))
   :version "29.1")
 
 (defvar mouse--last-down nil)