Mercurial > emacs

diff lisp/mouse.el @ 11453:5ed0795c4155

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Create mouse-drag-overlay as a dead overlay, instead of having it live in the *scratch* buffer until first used.
author Karl Heuer <kwzh@gnu.org>
date Fri, 14 Apr 1995 22:39:19 +0000
parents e6bdaaa6ce1b
children f470809e6a60
line wrap: on
line diff
--- a/lisp/mouse.el	Fri Apr 14 22:16:50 1995 +0000
+++ b/lisp/mouse.el	Fri Apr 14 22:39:19 1995 +0000
@@ -371,7 +371,9 @@
     (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)