branch: elpa/sweeprolog
commit 1f83ce9f04944e120a192eda1ee395b87dbb4d55
Author: Eshel Yaron <m...@eshelyaron.com>
Commit: Eshel Yaron <m...@eshelyaron.com>
FIXED: use operators from xref in sweep_colourise_some_terms
---
sweep.pl | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/sweep.pl b/sweep.pl
index 1c90e853c9..78f5dec08b 100644
--- a/sweep.pl
+++ b/sweep.pl
@@ -274,9 +274,11 @@ sweep_colourise_some_terms_(Path0, Offset, Contents, []) :-
set_stream(Contents, encoding(utf8)),
set_stream(Contents, file_name(Path)),
seek(Contents, 0, bof, _),
+ findall(Op, xref_op(Path, Op), Ops),
prolog_colourise_stream(Contents,
Path,
- sweep_handle_query_color(Offset)).
+ sweep_handle_query_color(Offset),
+ [operators(Ops)]).
sweep_documentation([Path, Functor, Arity], Docs) :-
atom_string(P, Path),
