master bff3edf: Fix point movement in morse-region and nato-region

[Lars Ingebrigtsen]

branch: master
commit bff3edfd17ede3f6c9ae2f2a3588c155d6d11de4
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Fix point movement in morse-region and nato-region
    
    * lisp/play/morse.el (morse-region):
    (nato-region): Leave point after the translated region
    (bug#18717).
---
 lisp/play/morse.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/play/morse.el b/lisp/play/morse.el
index 91dc687..66a826f 100644
--- a/lisp/play/morse.el
+++ b/lisp/play/morse.el
@@ -165,7 +165,7 @@ Geospatial-Intelligence Agency at URL 
`https://www.nga.mil/'")
               (setq sep ""))
              ((setq morse (assoc str morse-code))
               (delete-char 1)
-              (insert sep (cdr morse))
+              (insert-before-markers sep (cdr morse))
               (setq sep "/"))
              (t
               (forward-char 1)
@@ -211,7 +211,7 @@ Geospatial-Intelligence Agency at URL 
`https://www.nga.mil/'")
               (setq sep ""))
              ((setq nato (assoc str nato-alphabet))
               (delete-char 1)
-              (insert sep (cdr nato))
+              (insert-before-markers sep (cdr nato))
               (setq sep "-"))
              (t
               (forward-char 1)