[nongnu] elpa/multiple-cursors 39f1725 248/434: Add support for god-mode

[ELPA Syncer]

branch: elpa/multiple-cursors
commit 39f17258b80701b7deaeb9f734ad50f2ce36ad8b
Author: Magnar Sveen <magnars@gmail.com>
Commit: Magnar Sveen <magnars@gmail.com>

    Add support for god-mode
    
    @chrisdone
---
 multiple-cursors-core.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/multiple-cursors-core.el b/multiple-cursors-core.el
index efb1ba1..f1aadd3 100644
--- a/multiple-cursors-core.el
+++ b/multiple-cursors-core.el
@@ -306,8 +306,10 @@ been remapped. And certain modes (cua comes to mind) will 
change their
 remapping based on state. So a command that changes the state will afterwards
 not be recognized through the command-remapping lookup."
   (unless mc--executing-command-for-fake-cursor
-    (setq mc--this-command (or (command-remapping this-original-command)
-                               this-original-command))))
+    (let (cmd (or (command-remapping this-original-command)
+                  this-original-command))
+      (setq mc--this-command (and (not (eq cmd 'god-mode-self-insert))
+                                  cmd)))))
 
 (defun mc/execute-this-command-for-all-cursors ()
   "Wrap around `mc/execute-this-command-for-all-cursors-1' to protect hook."
@@ -337,7 +339,6 @@ the original cursor, to inform about the lack of support."
 
     (if (eq 1 (mc/num-cursors)) ;; no fake cursors? disable mc-mode
         (multiple-cursors-mode 0)
-
       (when this-original-command
         (let ((original-command (or mc--this-command
                                     (command-remapping this-original-command)