25
1
mirror of https://github.com/processone/ejabberd.git synced 2024-11-22 16:20:52 +01:00

Fix update with stripped beams (thanks to Jose M Herrero)(EJAB-1520)

This commit is contained in:
Badlop 2011-12-21 12:58:58 +01:00
parent c4c0b45ced
commit 33973677f2

View File

@ -128,8 +128,10 @@ get_new_version(Module) ->
get_current_version(Module) -> get_current_version(Module) ->
Attrs = Module:module_info(attributes), Attrs = Module:module_info(attributes),
{value, {vsn, CurVsn}} = lists:keysearch(vsn, 1, Attrs), case lists:keysearch(vsn, 1, Attrs) of
CurVsn. {value, {vsn, CurVsn}} -> CurVsn;
_ -> unknown_version
end.
%% @spec(Dir::string(), UpdatedBeams::[atom()]) -> {Script,LowLevelScript,Check} %% @spec(Dir::string(), UpdatedBeams::[atom()]) -> {Script,LowLevelScript,Check}
build_script(Dir, UpdatedBeams) -> build_script(Dir, UpdatedBeams) ->