Produce a better error message if qdate hasn't been started
This commit is contained in:
parent
817c14c46e
commit
794d03a5ee
4 changed files with 37 additions and 21 deletions
|
@ -5,9 +5,9 @@
|
|||
{registered, []},
|
||||
{applications, [
|
||||
kernel,
|
||||
stdlib,
|
||||
qdate_localtime,
|
||||
erlware_commons,
|
||||
stdlib
|
||||
erlware_commons
|
||||
]},
|
||||
{modules, [qdate, qdate_srv, qdate_sup, qdate_app]},
|
||||
{env, []},
|
||||
|
|
|
@ -152,8 +152,26 @@ unset_env(Key) ->
|
|||
gen_server:call(?SERVER, {unset, ?KEY(Key)}).
|
||||
|
||||
get_all_env(FilterTag) ->
|
||||
All = ets:tab2list(?TABLE),
|
||||
[{Key, V} || {{?BASETAG, {Tag, Key}}, V} <- All, Tag==FilterTag].
|
||||
try ets:tab2list(?TABLE) of
|
||||
All ->
|
||||
[{Key, V} || {{?BASETAG, {Tag, Key}}, V} <- All, Tag==FilterTag]
|
||||
catch
|
||||
error:badarg:S ->
|
||||
Msg = maybe_start_msg(),
|
||||
logger:error(Msg),
|
||||
|
||||
error({qdate_get_all_env_failed, #{
|
||||
original_error => {error, badarg, S}
|
||||
}})
|
||||
end.
|
||||
|
||||
maybe_start_msg() ->
|
||||
"Attempting to read qdate environment failed (qdate_srv:get_all_env/1).\n"
|
||||
"qdate may not have been started properly.\n"
|
||||
"Please ensure qdate is started properly by either:\n"
|
||||
"* Putting qdate in the 'applications' key in your .app.src or .app file, or\n"
|
||||
"* Starting it manually with application:ensure_all_started(qdate) or qdate:start().".
|
||||
|
||||
|
||||
%% ProcDic Vars
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue