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

Set this-command for each cursor.

Browse Source 
- enables proper interop with delete-selection-mode
This commit is contained in:
Magnar Sveen 2012-07-18 09:10:55 +02:00
parent 45488dfda6
commit 37ddaf2cbe
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
multiple-cursors-core.el
View File

@ -99,8 +99,10 @@ cursor with updated info."
(mc/for-each-fake-cursor (mc/for-each-fake-cursor
(mc/pop-state-from-overlay cursor) (mc/pop-state-from-overlay cursor)
(ignore-errors (ignore-errors
(setq this-command cmd)
(run-hooks 'pre-command-hook) (run-hooks 'pre-command-hook)
(call-interactively cmd) (unless (eq this-command 'ignore)
(call-interactively cmd))
(when deactivate-mark (deactivate-mark)) (when deactivate-mark (deactivate-mark))
(mc/create-fake-cursor-at-point)))))) (mc/create-fake-cursor-at-point))))))
@ -189,7 +191,6 @@ from being executed if in multiple-cursors-mode."
;; Commands that does not work with multiple-cursors ;; Commands that does not work with multiple-cursors
(unsupported-cmd isearch-forward ". Feel free to add a compatible version.") (unsupported-cmd isearch-forward ". Feel free to add a compatible version.")
(unsupported-cmd isearch-backward ". Feel free to add a compatible version.") (unsupported-cmd isearch-backward ". Feel free to add a compatible version.")
(unsupported-cmd delete-char ", delete-forward-char is preferred for interactive use.")
;; Fixing certain commands ;; Fixing certain commands
;;---------------------------------------------------------------------------------------- ;;----------------------------------------------------------------------------------------
@ -263,7 +264,7 @@ from being executed if in multiple-cursors-mode."
subword-downcase subword-downcase
backward-kill-word backward-kill-word
backward-delete-char-untabify backward-delete-char-untabify
delete-forward-char c-electric-delete-forward delete-char delete-forward-char c-electric-delete-forward
delete-backward-char c-electric-backspace delete-backward-char c-electric-backspace
c-electric-paren c-electric-paren
c-electric-semi&comma c-electric-semi&comma