branch: elpa/sweeprolog
commit 1744b29cc21694fde4e732ef9a3a010bdd4f47e0
Author: Eshel Yaron <m...@eshelyaron.com>
Commit: Eshel Yaron <m...@eshelyaron.com>
FIXED: off by one in sweep-colourise-some-terms
---
sweep.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/sweep.el b/sweep.el
index c461402eae..c10870f541 100644
--- a/sweep.el
+++ b/sweep.el
@@ -831,7 +831,7 @@ module name, F is a functor name and N is its arity."
(let* ((beg (save-mark-and-excursion
(goto-char beg0)
(sweep-beginning-of-top-term)
- (point)))
+ (max (1- (point)) (point-min))))
(end (save-mark-and-excursion
(goto-char end0)
(sweep-end-of-top-term)
