[nongnu] elpa/symbol-overlay 305ef1d283 080/152: fix bug caused by last merge

[ELPA Syncer]

branch: elpa/symbol-overlay
commit 305ef1d283923d2b0f1cd751f57f71754ab714e6
Author: unknown <yilai.wl@hz.ali.com>
Commit: unknown <yilai.wl@hz.ali.com>

    fix bug caused by last merge
---
 symbol-overlay.el | 19 +++++++++----------
 1 file changed, 9 insertions(+), 10 deletions(-)

diff --git a/symbol-overlay.el b/symbol-overlay.el
index bdbc0168be..367791d0a9 100644
--- a/symbol-overlay.el
+++ b/symbol-overlay.el
@@ -519,16 +519,15 @@ DIR must be 1 or -1."
                              (substring symbol 3 -3))
            new (symbol-overlay-get-symbol txt))
       (unless (string= new symbol)
-        (let ((prev-overlay (symbol-overlay-assoc new)))
-         (symbol-overlay-maybe-remove prev-overlay)
-         (save-excursion
-           (save-restriction
-             (symbol-overlay-narrow scope)
-             (goto-char (point-min))
-             (let ((inhibit-modification-hooks t))
-               (while (re-search-forward symbol nil t) (replace-match txt 
t)))))
-          (when prev-overlay
-           (setq keyword (symbol-overlay-put-all new scope keyword)))))
+        (symbol-overlay-maybe-remove (symbol-overlay-assoc new))
+        (save-excursion
+          (save-restriction
+            (symbol-overlay-narrow scope)
+            (goto-char (point-min))
+            (let ((inhibit-modification-hooks t))
+              (while (re-search-forward symbol nil t) (replace-match txt t)))))
+        (when keyword
+          (setq keyword (symbol-overlay-put-all new scope keyword))))
       (when (string= new (symbol-overlay-get-symbol nil t))
        (symbol-overlay-maybe-count keyword)))))