ld/multiple-cursors.el
1
0
Fork 0
mirror of https://github.com/magnars/multiple-cursors.el.git synced 2025-10-13 13:03:03 +00:00
Code Issues Packages Projects Releases Wiki Activity

Detect cursor bar type when specified by the frame.

Browse Source 
When the 'cursor-type' for the buffer is specified by the frame, this
was not detected by the current logic as 'cursor-type' will be set to
't' and thus not explicitly match 'bar'.  This update checks to see if
'cursor-type' is specified by the frame and will pull the parameter
from the frame if it is, prior to subsequent checks.
This commit is contained in:
Troy Brown 2022-11-25 23:22:14 -05:00 committed by Magnar Sveen
parent 1e4842d129
commit fe0d516745
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
multiple-cursors-core.el
View File

@ -122,9 +122,13 @@ rendered or shift text."
(defun mc/cursor-is-bar () (defun mc/cursor-is-bar ()
"Return non-nil if the cursor is a bar." "Return non-nil if the cursor is a bar."
(let ((cursor-type
(if (eq cursor-type t)
(frame-parameter nil 'cursor-type)
cursor-type)))
(or (eq cursor-type 'bar) (or (eq cursor-type 'bar)
(and (listp cursor-type) (and (listp cursor-type)
(eq (car cursor-type) 'bar)))) (eq (car cursor-type) 'bar)))))
(defun mc/line-number-at-pos (&optional pos absolute) (defun mc/line-number-at-pos (&optional pos absolute)
"Faster implementation of `line-number-at-pos'." "Faster implementation of `line-number-at-pos'."