initial module is user

This commit is contained in:
Vítor Santos Costa 2015-04-13 23:46:14 +01:00
parent 3c73a2e6d6
commit b14dc43bc9

View File

@ -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)),