From c7b7300bda5d9b5776e6e8ffb6621fc9a48bea7f Mon Sep 17 00:00:00 2001 From: Eshel Yaron Date: Wed, 9 Nov 2022 22:24:27 +0200 Subject: [PATCH] FIXED: properly update query highlighting in the toplevel --- sweeprolog.el | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/sweeprolog.el b/sweeprolog.el index 8dbaf44..13ad70f 100644 --- a/sweeprolog.el +++ b/sweeprolog.el @@ -1586,6 +1586,13 @@ When non-nil, only predicates whose name contains PREFIX are returned." (:inherit default) "Top terms.") +(sweeprolog-defface + body + (:inherit default) + (:inherit default) + (:inherit default) + "Clause and query bodies.") + (sweeprolog-defface directive (:inherit default) @@ -1779,6 +1786,8 @@ When non-nil, only predicates whose name contains PREFIX are returned." (list (list beg end (sweeprolog-op-type-face)))) ("directive" (list (list beg end nil) (list beg end (sweeprolog-directive-face)))) + ("body" + (list (list beg end nil) (list beg end (sweeprolog-body-face)))) ("clause" (list (list beg end nil) (list beg end (sweeprolog-clause-face)))) ("term" -- 2.39.2