Don't get annoyed so easily at multiple cursors.

This commit is contained in:
Magnar Sveen 2012-05-11 16:29:38 +02:00
parent e44f45fc2d
commit 382616ad9a

View File

@ -177,7 +177,8 @@ It works by moving point to the fake cursor, setting
up the proper kill-ring, and then removing the cursor. up the proper kill-ring, and then removing the cursor.
After executing the command, it sets up a new fake After executing the command, it sets up a new fake
cursor with updated info." cursor with updated info."
(let ((current-kill-ring kill-ring)) (let ((current-kill-ring kill-ring)
(annoying-arrows-mode nil))
(save-excursion (save-excursion
(mapc #'(lambda (o) (mapc #'(lambda (o)
(when (eq (overlay-get o 'type) 'additional-cursor) (when (eq (overlay-get o 'type) 'additional-cursor)