From: Eshel Yaron <me@eshelyaron.com>
Date: Fri, 23 Sep 2022 18:43:38 +0000 (+0300)
Subject: FIXED: qualify calls to sweep_funcall/2
X-Git-Tag: v0.3.3~7
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8179cb42041c0207f3bdcfb8aee9d9d701296a0e;p=sweep.git

FIXED: qualify calls to sweep_funcall/2
---

diff --git a/sweep.pl b/sweep.pl
index 4ee0b66..3556a75 100644
--- a/sweep.pl
+++ b/sweep.pl
@@ -596,7 +596,7 @@ sweep_colourise_query([String|Offset], _) :-
 sweep_handle_query_color(Offset, Col, Beg, Len) :-
     sweep_color_normalized(Offset, Col, Nom),
     Start is Beg + Offset,
-    sweep_funcall("sweep--colourise", [Start,Len|Nom], _).
+    user:sweep_funcall("sweep--colourise", [Start,Len|Nom], _).
 
 sweep_color_normalized(Offset, Col, Nom) :-
     Col =.. [Nom0|Rest],
@@ -663,7 +663,7 @@ sweep_message_hook(Term, Kind0, _Lines) :-
     should_handle_message_kind(Kind0, Kind),
     !,
     message_to_string(Term, String),
-    sweep_funcall("sweep-message", [Kind|String], _).
+    user:sweep_funcall("sweep-message", [Kind|String], _).
 
 should_handle_message_kind(error, "error").
 should_handle_message_kind(warning, "warning").