branch: elpa/symbol-overlay
commit 1071d4ac87a520c357cfb357cbc852d1965d5100
Author: ksqsf <i...@ksqsf.moe>
Commit: ksqsf <i...@ksqsf.moe>

    Minor improvement.
---
 symbol-overlay.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/symbol-overlay.el b/symbol-overlay.el
index faad64b7d9..ff14ee5006 100644
--- a/symbol-overlay.el
+++ b/symbol-overlay.el
@@ -245,7 +245,7 @@ If EXCLUDE is non-nil, get all overlays excluding those 
belong to SYMBOL."
          (let ((value (overlay-get ov 'symbol))
                (end (overlay-end ov)))
            (and value
-                (if (< dir 0) (< end (point)) t)
+                (or (> dir 0) (< end (point)))
                 (or (not symbol)
                     (if (string= value symbol) (not exclude)
                       (and exclude (not (string= value ""))))))))

Reply via email to