emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/symbol-overlay 148652222c 025/152: fix some documentation


From: ELPA Syncer
Subject: [nongnu] elpa/symbol-overlay 148652222c 025/152: fix some documentation text.
Date: Thu, 7 Jul 2022 12:04:08 -0400 (EDT)

branch: elpa/symbol-overlay
commit 148652222c88de45748aaec492b064baa3cf421c
Author: wolray <290061869@qq.com>
Commit: wolray <290061869@qq.com>

    fix some documentation text.
---
 symbol-overlay.el | 15 +++++++--------
 1 file changed, 7 insertions(+), 8 deletions(-)

diff --git a/symbol-overlay.el b/symbol-overlay.el
index b1be28ced6..ddad9ad170 100644
--- a/symbol-overlay.el
+++ b/symbol-overlay.el
@@ -364,7 +364,7 @@ If COUNT is non-nil, count at the end."
       (symbol-overlay-get-symbol new))))
 
 (defun symbol-overlay-refresh (beg end len)
-  "Auto refresh overlays.  Installed on `after-change-functions'.
+  "Refresh overlays.  Installed on `after-change-functions'.
 BEG, END and LEN are the beginning, end and length of changed text."
   (unless (or (minibufferp) (not symbol-overlay-keywords-alist))
     (let ((case-fold-search nil)
@@ -380,13 +380,12 @@ BEG, END and LEN are the beginning, end and length of 
changed text."
                  (and (overlay-get overlay 'symbol)
                       (delete-overlay overlay)))
              (overlays-in beg end))
-       (mapc
-        #'(lambda (keyword)
-            (let ((symbol (car keyword)))
-              (goto-char beg)
-              (while (re-search-forward symbol end t)
-                (symbol-overlay-put-overlay symbol (cdr keyword)))))
-        symbol-overlay-keywords-alist)))))
+       (mapc #'(lambda (keyword)
+                 (let ((symbol (car keyword)))
+                   (goto-char beg)
+                   (while (re-search-forward symbol end t)
+                     (symbol-overlay-put-overlay symbol (cdr keyword)))))
+             symbol-overlay-keywords-alist)))))
 
 (add-hook 'after-change-functions 'symbol-overlay-refresh)
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]