(mouse-sel-lost-selection-hook): Undo prev change.

7b990caf · Richard M. Stallman · 0d199f9c · 7b990caf
Commit 7b990caf authored Nov 15, 1995 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

lisp/mouse-sel.el lisp/mouse-sel.el +1 -1

No files found.
--- a/lisp/mouse-sel.el
+++ b/lisp/mouse-sel.el
@@ -574,7 +574,7 @@ If `mouse-yank-at-point' is non-nil, insert at point instead."

 (defun mouse-sel-lost-selection-hook (selection)
  "Remove the overlay for a lost selection."
-  (let ((overlay (mouse-sel-selection-overlay (car selection))))
+  (let ((overlay (mouse-sel-selection-overlay selection)))
    (delete-overlay overlay)))

 (add-hook 'x-lost-selection-hooks 'mouse-sel-lost-selection-hook)