[nongnu] elpa/evil b5c0387 7/7: Replace state shift line

[ELPA Syncer]

branch: elpa/evil
commit b5c038729958856b0b194a45daf988c42e97bc58
Author: Tom Dalziel <tom_dl@hotmail.com>
Commit: Tom Dalziel <33435574+tomdl89@users.noreply.github.com>

    Replace state shift line
---
 evil-commands.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/evil-commands.el b/evil-commands.el
index 166bb71..d7cdc5e 100644
--- a/evil-commands.el
+++ b/evil-commands.el
@@ -1942,7 +1942,7 @@ The text is shifted to the nearest multiple of 
`evil-shift-width'
 \(the rounding can be disabled by setting `evil-shift-round').
 If PRESERVE-EMPTY is non-nil, lines that contain only spaces are
 indented, too, otherwise they are ignored.  Location of point
-is preserved relative to text when called from insert state.
+is preserved relative to text when called from insert or replace states.
 Otherwise, it is determined by `evil-start-of-line' and/or `evil-track-eol'.
 See also `evil-shift-left'."
   :type line
@@ -1986,7 +1986,8 @@ See also `evil-shift-left'."
     ;; When called from insert state (C-t or C-d) the cursor should shift with 
the line,
     ;; otherwise (normal state) its position is determined by 
`evil-start-of-line'.
     (cond
-     ((evil-insert-state-p) (move-to-column (max 0 (+ col-for-insert 
first-shift))))
+     ((or (evil-insert-state-p) (evil-replace-state-p))
+      (move-to-column (max 0 (+ col-for-insert first-shift))))
      (evil-start-of-line (evil-first-non-blank))
      ((evil--stick-to-eol-p) (move-end-of-line 1))
      (t (move-to-column (or goal-column evil-operator-start-col))))