Make all new wallet names timestamps by default
This commit is contained in:
parent
cbae5fba49
commit
f60b794996
@ -389,10 +389,8 @@ do_wiz(State = #s{wx = WX, lang = Lang, wiz = none}) ->
|
|||||||
|
|
||||||
wiz_noob_assist(State = #s{j = J, wiz = {Wiz, _}}) ->
|
wiz_noob_assist(State = #s{j = J, wiz = {Wiz, _}}) ->
|
||||||
DefaultDir = zx_lib:path(var, "otpr", "gajudesk"),
|
DefaultDir = zx_lib:path(var, "otpr", "gajudesk"),
|
||||||
{{YY, MM, DD}, {Hr, Mn, Sc}} = calendar:local_time(),
|
Name = default_name(),
|
||||||
Form = "~4.10.0B-~2.10.0B-~2.10.0B_~2.10.0B-~2.10.0B-~2.10.0B",
|
Path = filename:join(DefaultDir, Name),
|
||||||
Name = io_lib:format(Form, [YY, MM, DD, Hr, Mn, Sc]),
|
|
||||||
Path = filename:join(DefaultDir, Name ++ ".gaju"),
|
|
||||||
case do_new2(Path, J, Wiz) of
|
case do_new2(Path, J, Wiz) of
|
||||||
ok ->
|
ok ->
|
||||||
Label = J("Account 1"),
|
Label = J("Account 1"),
|
||||||
@ -403,13 +401,19 @@ wiz_noob_assist(State = #s{j = J, wiz = {Wiz, _}}) ->
|
|||||||
State
|
State
|
||||||
end.
|
end.
|
||||||
|
|
||||||
|
default_name() ->
|
||||||
|
{{YY, MM, DD}, {Hr, Mn, Sc}} = calendar:local_time(),
|
||||||
|
Form = "~4.10.0B-~2.10.0B-~2.10.0B_~2.10.0B-~2.10.0B-~2.10.0B",
|
||||||
|
Name = io_lib:format(Form, [YY, MM, DD, Hr, Mn, Sc]),
|
||||||
|
unicode:characters_to_list(Name ++ ".gaju").
|
||||||
|
|
||||||
|
|
||||||
do_new(State = #s{frame = Frame, j = J, prefs = Prefs}) ->
|
do_new(State = #s{frame = Frame, j = J, prefs = Prefs}) ->
|
||||||
DefaultDir = maps:get(dir, Prefs, zx_lib:path(var, "otpr", "gajudesk")),
|
DefaultDir = maps:get(dir, Prefs, zx_lib:path(var, "otpr", "gajudesk")),
|
||||||
Options =
|
Options =
|
||||||
[{message, J("Save Location")},
|
[{message, J("Save Location")},
|
||||||
{defaultDir, DefaultDir},
|
{defaultDir, DefaultDir},
|
||||||
{defaultFile, "default.gaju"},
|
{defaultFile, default_name()},
|
||||||
{wildCard, "*.gaju"},
|
{wildCard, "*.gaju"},
|
||||||
{sz, {300, 270}},
|
{sz, {300, 270}},
|
||||||
{style, ?wxFD_SAVE bor ?wxFD_OVERWRITE_PROMPT}],
|
{style, ?wxFD_SAVE bor ?wxFD_OVERWRITE_PROMPT}],
|
||||||
|
Loading…
x
Reference in New Issue
Block a user