diff options
author | Henrik Nord <[email protected]> | 2012-07-18 11:04:02 +0200 |
---|---|---|
committer | Henrik Nord <[email protected]> | 2012-07-18 11:04:02 +0200 |
commit | 154c00482d134260190127040ac6b4efb9f85a8f (patch) | |
tree | 9c09386fda97663f98a4bb5a5840df3d58f0b05f /lib/kernel/src/code_server.erl | |
parent | f82a553307c865440a01ff38e9b9d6482fe55550 (diff) | |
parent | 7875e98fcac4a45607a99ba08a421206a7cf1586 (diff) | |
download | otp-154c00482d134260190127040ac6b4efb9f85a8f.tar.gz otp-154c00482d134260190127040ac6b4efb9f85a8f.tar.bz2 otp-154c00482d134260190127040ac6b4efb9f85a8f.zip |
Merge branch 'ta/prim_archive-reloading' into maint
* ta/prim_archive-reloading:
escript_SUITE: remove gratuitous space
[erts,kernel,stdlib] fix escript/primary archive reloading
Conflicts:
erts/preloaded/src/erl_prim_loader.erl
OTP-10151
Diffstat (limited to 'lib/kernel/src/code_server.erl')
-rw-r--r-- | lib/kernel/src/code_server.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/kernel/src/code_server.erl b/lib/kernel/src/code_server.erl index a2db7c9790..00ad923466 100644 --- a/lib/kernel/src/code_server.erl +++ b/lib/kernel/src/code_server.erl @@ -394,8 +394,8 @@ handle_call(stop,{_From,_Tag}, S) -> handle_call({is_cached,_File}, {_From,_Tag}, S=#state{cache=no_cache}) -> {reply, no, S}; -handle_call({set_primary_archive, File, ArchiveBin, FileInfo}, {_From,_Tag}, S=#state{mode=Mode}) -> - case erl_prim_loader:set_primary_archive(File, ArchiveBin, FileInfo) of +handle_call({set_primary_archive, File, ArchiveBin, FileInfo, ParserFun}, {_From,_Tag}, S=#state{mode=Mode}) -> + case erl_prim_loader:set_primary_archive(File, ArchiveBin, FileInfo, ParserFun) of {ok, Files} -> {reply, {ok, Mode, Files}, S}; {error, _Reason} = Error -> |