# HG changeset patch # User Richard M. Stallman # Date 816460358 0 # Node ID 8c181dcb4fdda55fd4362c8bad164c1efc170df5 # Parent e640f6afb190f4c2eb53d015acecd6b77cdc576d (mouse-sel-lost-selection-hook): Undo prev change. diff -r e640f6afb190 -r 8c181dcb4fdd lisp/mouse-sel.el --- a/lisp/mouse-sel.el Wed Nov 15 18:32:09 1995 +0000 +++ b/lisp/mouse-sel.el Wed Nov 15 18:32:38 1995 +0000 @@ -574,7 +574,7 @@ (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)