From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 14 Nov 1995 22:57:02 +0000 (+0000)
Subject: (mouse-sel-lost-selection-hook): Use (car selection).
X-Git-Tag: emacs-19.34~2313
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=94f62922fabb004d1f453a344cbb16329d5220a0;p=emacs.git

(mouse-sel-lost-selection-hook): Use (car selection).
---

diff --git a/lisp/mouse-sel.el b/lisp/mouse-sel.el
index fe557ee755e..93c59a9b633 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 selection)))
+  (let ((overlay (mouse-sel-selection-overlay (car selection))))
     (delete-overlay overlay)))
 
 (add-hook 'x-lost-selection-hooks 'mouse-sel-lost-selection-hook)