[nongnu] elpa/evil-nerd-commenter f9d2da93de 204/235: inside org src block cursor move after comment

[ELPA Syncer]

branch: elpa/evil-nerd-commenter
commit f9d2da93de9c9c03afdf1d6f39881ca58cf6b168
Author: Chen Bin <chenbin.sh@gmail.com>
Commit: Chen Bin <chenbin.sh@gmail.com>

    inside org src block cursor move after comment
---
 evil-nerd-commenter.el | 16 +++++++++-------
 1 file changed, 9 insertions(+), 7 deletions(-)

diff --git a/evil-nerd-commenter.el b/evil-nerd-commenter.el
index 4ba62ace58..ed4ca80923 100644
--- a/evil-nerd-commenter.el
+++ b/evil-nerd-commenter.el
@@ -439,7 +439,9 @@ Code snippets embedded in Org-mode is identified and right 
`major-mode' is used.
           (setq new-code (buffer-substring-no-properties (point-min) 
(point-max))))
 
         (delete-region src-beg src-end)
-        (insert new-code)))
+        (insert new-code)
+        ;; go back to original position when comment inside org src-block
+        (goto-char old-pos)))
      (t
       (cond
        (evilnc-invert-comment-line-by-line
@@ -769,9 +771,9 @@ if NO-EMACS-KEYBINDINGS is t, we don't define keybindings 
in EMACS mode."
     (global-set-key (kbd "C-c p") 'evilnc-comment-or-uncomment-paragraphs))
 
   ;; Install key bindings for evil
-  (eval-after-load 'evil
-    '(progn
-       (unless no-evil-keybindings
+  (unless no-evil-keybindings
+    (eval-after-load 'evil
+      '(progn
          (define-key evil-normal-state-map ",ci" 
'evilnc-comment-or-uncomment-lines)
          (define-key evil-visual-state-map ",ci" 
'evilnc-comment-or-uncomment-lines)
          (define-key evil-normal-state-map ",cl" 
'evilnc-quick-comment-or-uncomment-to-the-line)
@@ -783,9 +785,9 @@ if NO-EMACS-KEYBINDINGS is t, we don't define keybindings 
in EMACS mode."
          (define-key evil-normal-state-map ",cv" 
'evilnc-toggle-invert-comment-line-by-line))))
 
   ;; Install operator for evil text objects
-  (eval-after-load 'evil-nerd-commenter-operator
-    '(progn
-       (unless (and no-evil-keybindings (not evilnc-use-comment-object-setup))
+  (unless (and no-evil-keybindings (not evilnc-use-comment-object-setup))
+    (eval-after-load 'evil-nerd-commenter-operator
+      '(progn
          ;; operator to comment at text objects
          (define-key evil-normal-state-map ",." 
'evilnc-copy-and-comment-operator)
          (define-key evil-visual-state-map ",." 
'evilnc-copy-and-comment-operator)