[nongnu] elpa/edit-indirect 7fffd87ac3 24/28: Don't modify buffer if nothing changed

[ELPA Syncer]

branch: elpa/edit-indirect
commit 7fffd87ac3b027d10a26e8492629da01a4cd7633
Author: Gong Qijian <gongqijian@gmail.com>
Commit: Fanael Linithien <fanael4@gmail.com>

    Don't modify buffer if nothing changed
---
 edit-indirect.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/edit-indirect.el b/edit-indirect.el
index 9a859d38aa..7bcd9f6186 100644
--- a/edit-indirect.el
+++ b/edit-indirect.el
@@ -341,9 +341,11 @@ No error is signaled if `inhibit-read-only' or
            'edit-indirect-before-commit-functions beg-marker end-marker)
           (save-match-data
             (set-match-data (list beg-marker end-marker))
-            (replace-match (with-current-buffer buffer
-                             (buffer-substring-no-properties 1 (1+ 
(buffer-size))))
-                           t t))
+            (let ((new-data
+                   (with-current-buffer buffer
+                     (buffer-substring-no-properties 1 (1+ (buffer-size))))))
+              (unless (string= new-data (match-string 0))
+                (replace-match new-data t t))))
           (edit-indirect--run-hook-with-positions
            'edit-indirect-after-commit-functions beg-marker (point))
           (set-marker beg-marker nil)