diff options
| author | Badlop <badlop@process-one.net> | 2008-03-10 11:59:53 +0000 |
|---|---|---|
| committer | Badlop <badlop@process-one.net> | 2008-03-10 11:59:53 +0000 |
| commit | 78ce676e81cd52314d433786a89d6d29e2d01228 (patch) | |
| tree | 69358891dbac5d742994267d9f43700666612115 /src | |
| parent | SVN Revision: 1224 (diff) | |
* src/ejabberd_update.erl: Fix crash when browsing the Update
page in Erlang R12 (EJAB-552)
SVN Revision: 1225
Diffstat (limited to 'src')
| -rw-r--r-- | src/ejabberd_update.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/ejabberd_update.erl b/src/ejabberd_update.erl index a9cefd066..ef3c4a47a 100644 --- a/src/ejabberd_update.erl +++ b/src/ejabberd_update.erl @@ -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 -> |