diff --git a/pl/messages.yap b/pl/messages.yap
index b5384e67e..bcc05f818 100644
--- a/pl/messages.yap
+++ b/pl/messages.yap
@@ -20,12 +20,11 @@
 	  [system_message/4,
 	   prefix/6,
 	   prefix/5,
-	   file_location/3,
-	   message/3]).
+	   file_location/3]).
 
 :- use_system_module( user, [generate_message_hook/3]).
 
-:- multifile message/3.
+:- multifile prolog:message/3.
 
 :- multifile user:generate_message_hook/3.