summaryrefslogtreecommitdiff
path: root/lisp/mouse-sel.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1995-11-15 18:32:38 +0000
committerRichard M. Stallman <rms@gnu.org>1995-11-15 18:32:38 +0000
commit7b990caf7e39cfbd1cda6e71075ad28b2ca3d312 (patch)
tree9135ee6c0d7085bf24d28d27821f801143e2a7d2 /lisp/mouse-sel.el
parent0d199f9c6baa84ed0831004a9c8947f9f6aed0e0 (diff)
downloademacs-7b990caf7e39cfbd1cda6e71075ad28b2ca3d312.tar.gz
(mouse-sel-lost-selection-hook): Undo prev change.
Diffstat (limited to 'lisp/mouse-sel.el')
-rw-r--r--lisp/mouse-sel.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mouse-sel.el b/lisp/mouse-sel.el
index 93c59a9b633..fe557ee755e 100644
--- 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)