mirror of
https://github.com/processone/ejabberd.git
synced 2024-11-24 16:23:40 +01:00
* src/ejabberd_update.erl: Fix crash when browsing the Update
page in Erlang R12 (EJAB-552) SVN Revision: 1225
This commit is contained in:
parent
0f9102e4d1
commit
78ce676e81
@ -1,3 +1,8 @@
|
||||
2008-03-10 Badlop <badlop@process-one.net>
|
||||
|
||||
* src/ejabberd_update.erl: Fix crash when browsing the Update
|
||||
page in Erlang R12 (EJAB-552)
|
||||
|
||||
2008-03-09 Alexey Shchepin <alexey@process-one.net>
|
||||
|
||||
* src/web/ejabberd_http_poll.erl: Fixed HTTP headers when a
|
||||
|
@ -55,12 +55,12 @@ update_info() ->
|
||||
UpdatedBeams =
|
||||
lists:filter(
|
||||
fun(Module) ->
|
||||
{ok, {Module, [NewVsn]}} =
|
||||
{ok, {Module, NewVsn}} =
|
||||
beam_lib:version(code:which(Module)),
|
||||
case code:is_loaded(Module) of
|
||||
{file, _} ->
|
||||
Attrs = Module:module_info(attributes),
|
||||
{value, {vsn, [CurVsn]}} =
|
||||
{value, {vsn, CurVsn}} =
|
||||
lists:keysearch(vsn, 1, Attrs),
|
||||
NewVsn /= CurVsn;
|
||||
false ->
|
||||
|
Loading…
Reference in New Issue
Block a user