diff options
Diffstat (limited to 'lisp/mouse-copy.el')
-rw-r--r-- | lisp/mouse-copy.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/mouse-copy.el b/lisp/mouse-copy.el index 67d797f488..86ddc4c5bf 100644 --- a/lisp/mouse-copy.el +++ b/lisp/mouse-copy.el @@ -200,8 +200,7 @@ by johnh@ficus.cs.ucla.edu." (window-buffer (posn-window (event-start click))) (current-buffer))) (error "Select or click on the buffer where the secondary selection is"))) - (save-excursion - (set-buffer (overlay-buffer mouse-secondary-overlay)) + (with-current-buffer (overlay-buffer mouse-secondary-overlay) (kill-region (overlay-start mouse-secondary-overlay) (overlay-end mouse-secondary-overlay))) ;; (delete-overlay mouse-secondary-overlay) |