Chapril/xmpp.chapril.org-ejabberd
25
1
Fork 0
mirror of https://github.com/processone/ejabberd.git synced 2024-11-24 16:23:40 +01:00
Code Releases Activity

Cut the string when calling halt/1

Browse Source
This commit is contained in:
Badlop 2011-05-30 17:11:32 +02:00
parent d6a076dae8
commit d4d28e038b
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/ejabberd_config.erl
View File

@ -215,7 +215,7 @@ exit_or_halt(ExitText) ->
case [Vsn || {ejabberd, _Desc, Vsn} <- application:which_applications()] of case [Vsn || {ejabberd, _Desc, Vsn} <- application:which_applications()] of
[] -> [] ->
timer:sleep(1000), timer:sleep(1000),
halt(ExitText); halt(string:substr(ExitText, 1, 199));
[_] -> [_] ->
exit(ExitText) exit(ExitText)
end. end.

2
src/gen_mod.erl
View File

@ -79,7 +79,7 @@ start_module(Host, Module, Opts) ->
false -> false ->
?CRITICAL_MSG("ejabberd initialization was aborted because a module start failed.", []), ?CRITICAL_MSG("ejabberd initialization was aborted because a module start failed.", []),
timer:sleep(3000), timer:sleep(3000),
erlang:halt(lists:flatten(ErrorText)) erlang:halt(string:substr(lists:flatten(ErrorText), 1, 199))
end end
end. end.