From 5b54d23b8b81297a1cd4a2606aea735461b636cb Mon Sep 17 00:00:00 2001 From: Eshel Yaron Date: Thu, 8 Sep 2022 16:53:39 +0300 Subject: [PATCH] ENHANCED: apply an appropriate face to global predicate calls --- sweep.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/sweep.el b/sweep.el index 932eec3..44baa15 100644 --- a/sweep.el +++ b/sweep.el @@ -743,12 +743,14 @@ module name, F is a functor name and N is its arity." (`("meta" . ,_) sweep-meta-face) (`("built_in" . ,_) sweep-built-in-face) (`("undefined" . ,_) sweep-undefined-face) + (`("global" . ,_) sweep-global-face) (`(,(rx (seq "dynamic ")) . ,_) sweep-dynamic-face) (`(,(rx (seq "multifile ")) . ,_) sweep-multifile-face) (`(,(rx (seq "thread_local ")) . ,_) sweep-thread-local-face) (`(,(rx (seq "extern(")) . ,_) sweep-extern-face) (`(,(rx (seq "autoload(")) . ,_) sweep-autoload-face) (`(,(rx (seq "imported(")) . ,_) sweep-imported-face) + (`(,(rx (seq "global(")) . ,_) sweep-global-face) (`(,(rx (seq "local(")) . ,_) sweep-local-face) (other (message "unknown goal color term %S" other) sweep-goal-face)))) (`("syntax_error" ,_message ,_eb ,_ee) -- 2.39.2