Bugfix for sort/reverse regions w/similar contents

This commit is contained in:
Magnar Sveen 2013-02-11 07:28:26 +01:00
parent cb7a145153
commit 16add89d29

View File

@ -48,9 +48,9 @@
(let (strings) (let (strings)
(save-excursion (save-excursion
(mc/for-each-cursor-ordered (mc/for-each-cursor-ordered
(add-to-list 'strings (buffer-substring-no-properties (setq strings (cons (buffer-substring-no-properties
(mc/cursor-beg cursor) (mc/cursor-beg cursor)
(mc/cursor-end cursor))))strings) (mc/cursor-end cursor)) strings))))
(nreverse strings))) (nreverse strings)))
(defvar mc--strings-to-replace nil) (defvar mc--strings-to-replace nil)