# HG changeset patch # User Karl Heuer # Date 797899159 0 # Node ID 5ed0795c4155f872b847d91038c9572b8e75afbc # Parent a24224fc5a9275f37243eb39129508496921c525 Create mouse-drag-overlay as a dead overlay, instead of having it live in the *scratch* buffer until first used. diff -r a24224fc5a92 -r 5ed0795c4155 lisp/mouse.el --- 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)