From f60b794996051277cec37c73e4b979de889f501e Mon Sep 17 00:00:00 2001
From: Craig Everett <zxq9@zxq9.com>
Date: Thu, 7 Aug 2025 14:05:42 +0900
Subject: [PATCH] Make all new wallet names timestamps by default

---
 src/gd_v_wallman.erl | 14 +++++++++-----
 1 file changed, 9 insertions(+), 5 deletions(-)

diff --git a/src/gd_v_wallman.erl b/src/gd_v_wallman.erl
index 7b388dc..c5cf444 100644
--- a/src/gd_v_wallman.erl
+++ b/src/gd_v_wallman.erl
@@ -389,10 +389,8 @@ do_wiz(State = #s{wx = WX, lang = Lang, wiz = none}) ->
 
 wiz_noob_assist(State = #s{j = J, wiz = {Wiz, _}}) ->
     DefaultDir = zx_lib:path(var, "otpr", "gajudesk"),
-    {{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]),
-    Path = filename:join(DefaultDir, Name ++ ".gaju"),
+    Name = default_name(),
+    Path = filename:join(DefaultDir, Name),
     case do_new2(Path, J, Wiz) of
         ok ->
             Label = J("Account 1"),
@@ -403,13 +401,19 @@ wiz_noob_assist(State = #s{j = J, wiz = {Wiz, _}}) ->
             State
     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}) ->
     DefaultDir = maps:get(dir, Prefs, zx_lib:path(var, "otpr", "gajudesk")),
     Options =
         [{message,     J("Save Location")},
          {defaultDir,  DefaultDir},
-         {defaultFile, "default.gaju"},
+         {defaultFile, default_name()},
          {wildCard,    "*.gaju"},
          {sz,          {300, 270}},
          {style,       ?wxFD_SAVE bor ?wxFD_OVERWRITE_PROMPT}],