]> git.eshelyaron.com Git - emacs.git/commitdiff
Revert "admin/gitmerge.el (gitmerge-resolve): Use `replace-region-contents`"
authorStefan Monnier <monnier@iro.umontreal.ca>
Tue, 1 Jul 2025 13:24:19 +0000 (09:24 -0400)
committerEshel Yaron <me@eshelyaron.com>
Wed, 23 Jul 2025 20:11:45 +0000 (22:11 +0200)
This reverts commit 17d976e22e9b0ba10dcbe1655a93bc4d165d7097
because the change is not worth the risk.

(cherry picked from commit 549232e2e45c77852d2ecd278fe233ea93ce172e)

admin/gitmerge.el

index ec2e5dd267b55e078d9700bcc564982c653ce8e8..5bfb23dc3a262e3d1b44d59b871ca96d575f769d 100644 (file)
@@ -324,8 +324,12 @@ Returns non-nil if conflicts remain."
                   ;; match-3's first.
                   (let ((match3 (buffer-substring start3 end3))
                         (match1 (buffer-substring start1 end1)))
-                    (replace-region-contents start3 end3 match1 0)
-                    (replace-region-contents start1 end1 match3 0)))))
+                    (delete-region start3 end3)
+                    (goto-char start3)
+                    (insert match1)
+                    (delete-region start1 end1)
+                    (goto-char start1)
+                    (insert match3)))))
             ;; (pop-to-buffer (current-buffer)) (debug 'before-resolve)
             ))
           ;; Try to resolve the conflicts.