[nongnu] elpa/cycle-at-point c88b42edea 07/18: Use recomplete-replace-in-region utility function

[ELPA Syncer]

branch: elpa/cycle-at-point
commit c88b42edea89c8f718eb325433ec7ae7c6cd320a
Author: Campbell Barton <ideasman42@gmail.com>
Commit: Campbell Barton <ideasman42@gmail.com>

    Use recomplete-replace-in-region utility function
---
 cycle-at-point.el | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/cycle-at-point.el b/cycle-at-point.el
index 73769084da..814f2b4623 100644
--- a/cycle-at-point.el
+++ b/cycle-at-point.el
@@ -287,9 +287,7 @@ Argument FN-CACHE stores the result for reuse."
 
     (when result-choices
       (let ((word-at-index (nth (mod cycle-index (length result-choices)) 
result-choices)))
-        (goto-char word-beg)
-        (delete-region word-beg word-end)
-        (insert word-at-index))
+        (recomplete-replace-in-region word-at-index word-beg word-end))
 
       (list result-choices fn-cache))))