ld/multiple-cursors.el
1
0
Fork 0
mirror of https://github.com/magnars/multiple-cursors.el.git synced 2026-02-04 06:12:25 +00:00
Code Issues Packages Projects Releases Wiki Activity

Clean up multiple-cursors-core

Browse Source
This commit is contained in:
Magnar Sveen
2012-06-21 15:46:16 +02:00
parent 8d491719f6
commit 87169c884c
2 changed files with 37 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
mc-edit-lines.el
View File

@@ -8,7 +8,7 @@ mark-multiple if point and mark is on different columns."
(interactive)
(when (not (use-region-p))
(error "Mark a set of lines first."))
(mc/remove-additional-cursors)
(mc/remove-fake-cursors)
(let* ((point-line (line-number-at-pos))
(mark-line (progn (exchange-point-and-mark) (line-number-at-pos)))
(navigation-func (if (< point-line mark-line) 'previous-line 'next-line)))