branch: elpa/sweeprolog
commit e49e93bfc51f49404edb14269a5b515e2a2046ce
Author: Eshel Yaron <m...@eshelyaron.com>
Commit: Eshel Yaron <m...@eshelyaron.com>
* (sweeprolog-analyze-fragment-to-faces) fix comment highlighting
---
sweeprolog.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/sweeprolog.el b/sweeprolog.el
index 76a1a274b5..4d66835e01 100644
--- a/sweeprolog.el
+++ b/sweeprolog.el
@@ -1887,7 +1887,7 @@ resulting list even when found in the current clause."
(setq cur (point)))
(skip-chars-forward " \t\n")
(push (list cur (point) nil) ws)
- (cons (list beg (point) nil)
+ (cons (list beg end nil)
(cons (list beg end (sweeprolog-fullstop-face))
ws)))))
("functor"
