[Emacs-diffs] Changes to emacs/lisp/mouse.el

[Richard M. Stallman]

Index: emacs/lisp/mouse.el
diff -c emacs/lisp/mouse.el:1.239 emacs/lisp/mouse.el:1.240
*** emacs/lisp/mouse.el:1.239   Tue Mar  5 13:40:20 2002
--- emacs/lisp/mouse.el Wed Apr 10 11:04:19 2002
***************
*** 739,745 ****
      (setq start-point (point))
      (let ((range (mouse-start-end start-point start-point click-count)))
        (move-overlay mouse-drag-overlay (car range) (nth 1 range)
!                   (window-buffer start-window)))
      (deactivate-mark)
      ;; end-of-range is used only in the single-click case.
      ;; It is the place where the drag has reached so far
--- 739,746 ----
      (setq start-point (point))
      (let ((range (mouse-start-end start-point start-point click-count)))
        (move-overlay mouse-drag-overlay (car range) (nth 1 range)
!                   (window-buffer start-window))
!       (overlay-put mouse-drag-overlay 'window (selected-window)))
      (deactivate-mark)
      ;; end-of-range is used only in the single-click case.
      ;; It is the place where the drag has reached so far