From c8a49b69abc0beb7eca4c4ccf18eefc52aaf7cee Mon Sep 17 00:00:00 2001 From: Po Lu Date: Sat, 2 Apr 2022 15:48:57 +0800 Subject: [PATCH] ; * 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 5e56a9e9727..3f43b39079d 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) -- 2.39.2