diff --git a/pl/consult.yap b/pl/consult.yap
index e63687a71..00bb2282c 100644
--- a/pl/consult.yap
+++ b/pl/consult.yap
@@ -250,7 +250,8 @@ load_files(Files,Opts) :-
 '$load_files'(Files, Opts, Call) :-
 	( '$nb_getval'('$lf_status', OldTOpts, fail), nonvar(OldTOpts) ->
 	  '$lf_opt'(silent, OldTOpts, OldVerbosity),
-	  '$lf_opt'(autoload, OldTOpts, OldAutoload)
+	  '$lf_opt'(autoload, OldTOpts, OldAutoload),
+	  '$lf_opt'('$context_module', OldTOpts, user)
 	;
 	  true ),
 	'$check_files'(Files,load_files(Files,Opts)),