Skip to content

Commit

Permalink
allow multiple cursors to be on the same line but not within 1 charac…
Browse files Browse the repository at this point in the history
…ter of eachother
  • Loading branch information
Book-reader committed Sep 7, 2024
1 parent 4947968 commit cc66f51
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion extensions/multiple-cursors/multiple-cursors.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -51,7 +51,7 @@

(defun clear-duplicate-cursors (buffer)
(loop :for (cursor next-cursor) :on (buffer-cursors buffer)
:when (and next-cursor (same-line-p cursor next-cursor))
:when (and next-cursor (and (same-line-p cursor next-cursor) (<= (abs (- (point-charpos cursor) (point-charpos next-cursor))) 1)))
:do (delete-fake-cursor
(if (eq cursor (buffer-point buffer))
next-cursor
Expand Down

0 comments on commit cc66f51

Please sign in to comment.