omit module prefix, because the goals are already module-qualified

diff --git a/src/loader.pl b/src/loader.pl
index 7c33d51e61a0d03e0737cdd0a51633404d4721f8..10e083f0b488843f90ce65347a4b973e4af0324b 100644 (file)
--- a/src/loader.pl
+++ b/src/loader.pl
@@ -92,12 +92,12 @@ run_initialization_goals(Module) :-
        % FIXME: failing here. also, see add_module.
        findall(Module:Goal, '$call'(builtins:retract(Module:'$initialization_goals'(Goal))), Goals),
        abolish(Module:'$initialization_goals'/1),
-       maplist(loader:success_or_warning(Module), Goals)
+       maplist(loader:success_or_warning, Goals)
     ;  true
     ).
 
-success_or_warning(Module, Goal) :-
-    (   Module:call(Goal) ->
+success_or_warning(Goal) :-
+    (   call(Goal) ->
         true
     ;   %% initialization goals can fail without thwarting the load.
         write('Warning: initialization/1 failed for: '),