mirror of
https://github.com/magnars/multiple-cursors.el.git
synced 2025-10-14 05:13:05 +00:00
return-from should be cl-return-from
This commit is contained in:
parent
7763f4f9d7
commit
1f3ccfbcd2
@ -88,7 +88,7 @@
|
|||||||
(cl-defun mc/cycle (next-cursor fallback-cursor loop-message)
|
(cl-defun mc/cycle (next-cursor fallback-cursor loop-message)
|
||||||
(when (null next-cursor)
|
(when (null next-cursor)
|
||||||
(when (eql 'stop (mc/handle-loop-condition loop-message))
|
(when (eql 'stop (mc/handle-loop-condition loop-message))
|
||||||
(return-from mc/cycle nil))
|
(cl-return-from mc/cycle nil))
|
||||||
(setf next-cursor fallback-cursor))
|
(setf next-cursor fallback-cursor))
|
||||||
(mc/create-fake-cursor-at-point)
|
(mc/create-fake-cursor-at-point)
|
||||||
(mc/pop-state-from-overlay next-cursor)
|
(mc/pop-state-from-overlay next-cursor)
|
||||||
|
Loading…
x
Reference in New Issue
Block a user