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

Skip folded lines with mc/edit-lines

Browse Source 
Fixes #99
This commit is contained in:
Magnar Sveen
2013-10-31 21:38:53 +01:00
parent cfe4bd9eb3
commit 239acbfbc8
2 changed files with 4 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
mc-edit-lines.el
View File

@@ -44,11 +44,13 @@ line point is on."
(direction (if (< point-line mark-line) :up :down)))
(deactivate-mark)
(when (and (eq direction :up) (bolp))
(forward-line -1)
(previous-logical-line 1 nil)
(move-to-column col))
(while (not (eq (line-number-at-pos) point-line))
(mc/create-fake-cursor-at-point)
(if (eq direction :up) (forward-line -1) (forward-line 1))
(if (eq direction :up)
(previous-logical-line 1 nil)
(next-logical-line 1 nil))
(move-to-column col))
(multiple-cursors-mode)))