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

Use (interactive "P") instead of the weird (but equivalent) (interactive (list prefix-arg))

Browse Source
This commit is contained in:
Marco Baringer 2012-10-10 10:04:22 +02:00
parent fcbb7a4df9
commit 876937bfa3
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
mc-cycle-cursors.el
View File

@ -55,7 +55,7 @@
prev))
(defun mc/cycle-forward (&optional error-if-no-next-cursor)
(interactive (list prefix-arg))
(interactive "P")
(let ((next-cursor (mc/next-cursor-after-point)))
(cond
(next-cursor
@ -68,7 +68,7 @@
(mc/cycle-backward t)))))
(defun mc/cycle-backward (&optional error-if-no-previous-cursor)
(interactive (list prefix-arg))
(interactive "P")
(let ((prev-cursor (mc/prev-cursor-before-point)))
(cond
(prev-cursor