diff --git a/pl/init.yap b/pl/init.yap
index 94cd1f73a..1b390d77c 100644
--- a/pl/init.yap
+++ b/pl/init.yap
@@ -170,8 +170,6 @@ otherwise.
 
 :-	 ['protect.yap'].
 
-:- source.
-
 version(yap,[6,3]).
 
 :- op(1150,fx,(mode)).
@@ -223,6 +221,8 @@ yap_hacks:cut_by(CP) :- '$$cut_by'(CP).
 :- multifile
 	prolog:comment_hook/3.
 
+:- source.
+
 :- module(user).
 
 /** @pred  _CurrentModule_:goal_expansion(+ _G_,+ _M_,- _NG_), user:goal_expansion(+ _G_,+ _M_,- _NG_) 
@@ -324,6 +324,8 @@ If this hook predicate succeeds it must instantiate the  _Action_ argument to th
 
 
  */
+
+
 :- multifile user:exception/3.
 
 :- dynamic user:exception/3.