From: Eshel Yaron <me@eshelyaron.com>
Date: Sat, 10 Sep 2022 12:54:12 +0000 (+0300)
Subject: FIXED: off by one in sweep-colourise-some-terms
X-Git-Tag: v0.2.0~11
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1744b29cc21694fde4e732ef9a3a010bdd4f47e0;p=sweep.git

FIXED: off by one in sweep-colourise-some-terms
---

diff --git a/sweep.el b/sweep.el
index c461402..c10870f 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)