[nongnu] elpa/subed 57c902a 068/389: subed-srt-sanitize: Don't change buffer unless it's necessary

[ELPA Syncer]

branch: elpa/subed
commit 57c902afd97aada37205f1b6d42e63548a4207e5
Author: Random User <rndusr@posteo.de>
Commit: Random User <rndusr@posteo.de>

    subed-srt-sanitize: Don't change buffer unless it's necessary
---
 subed/subed-srt.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/subed/subed-srt.el b/subed/subed-srt.el
index 0a80d4e..f876108 100644
--- a/subed/subed-srt.el
+++ b/subed/subed-srt.el
@@ -487,14 +487,15 @@ each subtitle."
        (while (subed-srt-forward-subtitle-id)
          (let ((prev-sub-end (save-excursion (when 
(subed-srt-backward-subtitle-end)
                                                (point)))))
-           (when prev-sub-end
+           (when (and prev-sub-end
+                      (not (string= (buffer-substring prev-sub-end (point)) 
"\n\n")))
              (delete-region prev-sub-end (point))
              (insert "\n\n"))))
 
        ;; Remove trailing newlines
        (goto-char (point-max))
        (subed-srt-move-to-subtitle-end)
-       (when (looking-at "\n*")
+       (when (looking-at "\n\\{2,\\}")
          (replace-match "\n"))
 
        ;; Ensure there is one space before and after " --> "