From dc269e81ca22ea04ac0c87ac035fd2f328241273 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Fri, 14 Apr 1995 22:39:19 +0000 Subject: [PATCH] Create mouse-drag-overlay as a dead overlay, instead of having it live in the *scratch* buffer until first used. --- lisp/mouse.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/lisp/mouse.el b/lisp/mouse.el index d75ee90b40c..a889706f3f7 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -371,7 +371,9 @@ Upon exit, point is at the far edge of the newly visible text." (or (eq window (selected-window)) (goto-char opoint)))) +;; Create an overlay and immediately delete it, to get "overlay in no buffer". (defvar mouse-drag-overlay (make-overlay 1 1)) +(delete-overlay mouse-drag-overlay) (overlay-put mouse-drag-overlay 'face 'region) (defvar mouse-selection-click-count 0) -- 2.39.5