From d595beb08d5cc63d11f3712214bd5ba41bed9302 Mon Sep 17 00:00:00 2001 From: Craig Everett Date: Thu, 12 Jun 2025 19:43:02 +0900 Subject: [PATCH] Minor display changes --- ebin/gajudesk.app | 2 +- src/gajudesk.erl | 2 +- src/gd_con.erl | 2 +- src/gd_grids.erl | 2 +- src/gd_gui.erl | 12 +++++++++--- src/gd_jt.erl | 2 +- src/gd_sophia_editor.erl | 2 +- src/gd_sup.erl | 2 +- src/gd_v.erl | 2 +- src/gd_v_devman.erl | 2 +- src/gd_v_netman.erl | 2 +- src/gd_v_wallman.erl | 2 +- zomp.meta | 2 +- 13 files changed, 21 insertions(+), 15 deletions(-) diff --git a/ebin/gajudesk.app b/ebin/gajudesk.app index bf9b5a3..2b66be0 100644 --- a/ebin/gajudesk.app +++ b/ebin/gajudesk.app @@ -3,7 +3,7 @@ {registered,[]}, {included_applications,[]}, {applications,[stdlib,kernel,sasl,ssl]}, - {vsn,"0.6.4"}, + {vsn,"0.6.5"}, {modules,[gajudesk,gd_con,gd_grids,gd_gui,gd_jt, gd_sophia_editor,gd_sup,gd_v,gd_v_devman,gd_v_netman, gd_v_wallman]}, diff --git a/src/gajudesk.erl b/src/gajudesk.erl index ead11d9..ee44e55 100644 --- a/src/gajudesk.erl +++ b/src/gajudesk.erl @@ -3,7 +3,7 @@ %%% @end -module(gajudesk). --vsn("0.6.4"). +-vsn("0.6.5"). -behavior(application). -author("Craig Everett "). -copyright("QPQ AG "). diff --git a/src/gd_con.erl b/src/gd_con.erl index 74fe4dd..5d2d629 100644 --- a/src/gd_con.erl +++ b/src/gd_con.erl @@ -3,7 +3,7 @@ %%% @end -module(gd_con). --vsn("0.6.4"). +-vsn("0.6.5"). -author("Craig Everett "). -copyright("QPQ AG "). -license("GPL-3.0-or-later"). diff --git a/src/gd_grids.erl b/src/gd_grids.erl index 688c2ea..1318440 100644 --- a/src/gd_grids.erl +++ b/src/gd_grids.erl @@ -37,7 +37,7 @@ %%% @end -module(gd_grids). --vsn("0.6.4"). +-vsn("0.6.5"). -author("Craig Everett "). -copyright("QPQ AG "). -license("GPL-3.0-or-later"). diff --git a/src/gd_gui.erl b/src/gd_gui.erl index 2963a26..ee8a1bc 100644 --- a/src/gd_gui.erl +++ b/src/gd_gui.erl @@ -3,7 +3,7 @@ %%% @end -module(gd_gui). --vsn("0.6.4"). +-vsn("0.6.5"). -author("Craig Everett "). -copyright("QPQ AG "). -license("GPL-3.0-or-later"). @@ -88,8 +88,10 @@ init(Prefs) -> Trans = gd_jt:read_translations(?MODULE), J = gd_jt:j(Lang, Trans), + AppName = J("GajuDesk"), + VSN = proplists:get_value(vsn, ?MODULE:module_info(attributes)), Wx = wx:new(), - Frame = wxFrame:new(Wx, ?wxID_ANY, J("GajuDesk")), + Frame = wxFrame:new(Wx, ?wxID_ANY, AppName ++ " v" ++ VSN), MainSz = wxBoxSizer:new(?wxVERTICAL), Picker = wxListBox:new(Frame, ?wxID_ANY, [{style, ?wxLC_SINGLE_SEL}]), @@ -748,7 +750,11 @@ spend2(#poa{id = ID, name = Name}, Nonce, Height, State = #s{frame = Frame, j = AmtTx = wxTextCtrl:new(Dialog, ?wxID_ANY), AmtSz = wxStaticBoxSizer:new(?wxVERTICAL, Dialog, [{label, J("Amount")}]), - _ = wxStaticBoxSizer:add(AmtSz, AmtTx, zxw:flags(wide)), + AmtInSz = wxBoxSizer:new(?wxHORIZONTAL), + AmtLabel = wxStaticText:new(Dialog, ?wxID_ANY, "木"), + _ = wxStaticBoxSizer:add(AmtInSz, AmtLabel, zxw:flags(base)), + _ = wxStaticBoxSizer:add(AmtInSz, AmtTx, zxw:flags(wide)), + _ = wxStaticBoxSizer:add(AmtSz, AmtInSz, zxw:flags(wide)), DataTx = wxTextCtrl:new(Dialog, ?wxID_ANY, [{style, ?wxTE_MULTILINE}]), DataSz = wxStaticBoxSizer:new(?wxVERTICAL, Dialog, [{label, J("Message (optional)")}]), diff --git a/src/gd_jt.erl b/src/gd_jt.erl index 659d209..d24a468 100644 --- a/src/gd_jt.erl +++ b/src/gd_jt.erl @@ -15,7 +15,7 @@ %%% translation library is retained). -module(gd_jt). --vsn("0.6.4"). +-vsn("0.6.5"). -export([read_translations/1, j/2, oneshot_j/2]). diff --git a/src/gd_sophia_editor.erl b/src/gd_sophia_editor.erl index feacca4..f69b63d 100644 --- a/src/gd_sophia_editor.erl +++ b/src/gd_sophia_editor.erl @@ -1,5 +1,5 @@ -module(gd_sophia_editor). --vsn("0.6.4"). +-vsn("0.6.5"). -export([new/1, update/2, get_text/1, set_text/2]). diff --git a/src/gd_sup.erl b/src/gd_sup.erl index dabad2c..f1de8d4 100644 --- a/src/gd_sup.erl +++ b/src/gd_sup.erl @@ -12,7 +12,7 @@ %%% @end -module(gd_sup). --vsn("0.6.4"). +-vsn("0.6.5"). -behaviour(supervisor). -author("Craig Everett "). -copyright("QPQ AG "). diff --git a/src/gd_v.erl b/src/gd_v.erl index 457a2f8..3262f79 100644 --- a/src/gd_v.erl +++ b/src/gd_v.erl @@ -1,5 +1,5 @@ -module(gd_v). --vsn("0.6.4"). +-vsn("0.6.5"). -author("Craig Everett "). -copyright("QPQ AG "). -license("GPL-3.0-or-later"). diff --git a/src/gd_v_devman.erl b/src/gd_v_devman.erl index e1ad552..562a88d 100644 --- a/src/gd_v_devman.erl +++ b/src/gd_v_devman.erl @@ -1,5 +1,5 @@ -module(gd_v_devman). --vsn("0.6.4"). +-vsn("0.6.5"). -author("Craig Everett "). -copyright("QPQ AG "). -license("GPL-3.0-or-later"). diff --git a/src/gd_v_netman.erl b/src/gd_v_netman.erl index dfb1ee9..8d12760 100644 --- a/src/gd_v_netman.erl +++ b/src/gd_v_netman.erl @@ -1,5 +1,5 @@ -module(gd_v_netman). --vsn("0.6.4"). +-vsn("0.6.5"). -author("Craig Everett "). -copyright("QPQ AG "). -license("GPL-3.0-or-later"). diff --git a/src/gd_v_wallman.erl b/src/gd_v_wallman.erl index f1b5c3b..45a824c 100644 --- a/src/gd_v_wallman.erl +++ b/src/gd_v_wallman.erl @@ -1,5 +1,5 @@ -module(gd_v_wallman). --vsn("0.6.4"). +-vsn("0.6.5"). -author("Craig Everett "). -copyright("QPQ AG "). -license("GPL-3.0-or-later"). diff --git a/zomp.meta b/zomp.meta index 1726d3c..507bc65 100644 --- a/zomp.meta +++ b/zomp.meta @@ -4,7 +4,7 @@ {prefix,"gd"}. {desc,"A desktop client for the Gajumaru network of blockchain networks"}. {author,"Craig Everett"}. -{package_id,{"otpr","gajudesk",{0,6,4}}}. +{package_id,{"otpr","gajudesk",{0,6,5}}}. {deps,[{"otpr","hakuzaru",{0,6,1}}, {"otpr","eblake2",{1,0,1}}, {"otpr","base58",{0,1,1}},