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

Move mc/maybe-multiple-cursors-mode to core.

Browse Source
This commit is contained in:
Magnar Sveen 2012-11-18 21:10:09 +01:00
parent 839c6ef077
commit 0a081a7c5f
2 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
mc-mark-more.el
View File

@ -80,12 +80,6 @@
(mc/cursor-end cursor)))) (mc/cursor-end cursor))))
strings)) strings))
(defun mc/maybe-multiple-cursors-mode ()
"Enable multiple-cursors-mode if there is more than one currently active cursor."
(if (> (mc/num-cursors) 1)
(multiple-cursors-mode 1)
(multiple-cursors-mode 0)))
(defvar mc/enclose-search-term nil (defvar mc/enclose-search-term nil
"How should mc/mark-more-* search for more matches? "How should mc/mark-more-* search for more matches?

6
multiple-cursors-core.el
View File

@ -458,6 +458,12 @@ They are temporarily disabled when multiple-cursors are active.")
(add-hook 'after-revert-hook #'(lambda () (multiple-cursors-mode 0))) (add-hook 'after-revert-hook #'(lambda () (multiple-cursors-mode 0)))
(defun mc/maybe-multiple-cursors-mode ()
"Enable multiple-cursors-mode if there is more than one currently active cursor."
(if (> (mc/num-cursors) 1)
(multiple-cursors-mode 1)
(multiple-cursors-mode 0)))
(defmacro unsupported-cmd (cmd msg) (defmacro unsupported-cmd (cmd msg)
"Adds command to list of unsupported commands and prevents it "Adds command to list of unsupported commands and prevents it
from being executed if in multiple-cursors-mode." from being executed if in multiple-cursors-mode."