QPQ-AG/GajuDesk
10
0
Fork 0
Code Issues 8 Pull Requests Actions Packages Projects Releases Wiki Activity

Minor usability tweaks

Browse Source
This commit is contained in:
Craig Everett
2025-04-25 22:52:25 +09:00
parent 28b0b2c6f3
commit 58a58c693f
13 changed files with 26 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/gajudesk.erl
+1 -1
View File
@@ -3,7 +3,7 @@
%%% @end
-module(gajudesk).
-vsn("0.5.5").
-vsn("0.5.6").
-behavior(application).
-author("Craig Everett <craigeverett@qpq.swiss>").
-copyright("QPQ AG <info@qpq.swiss>").
src/gd_con.erl
+5 -3
View File
@@ -3,7 +3,7 @@
%%% @end
-module(gd_con).
-vsn("0.5.5").
-vsn("0.5.6").
-author("Craig Everett <craigeverett@qpq.swiss>").
-copyright("QPQ AG <info@qpq.swiss>").
-license("GPL-3.0-or-later").
@@ -323,8 +323,10 @@ init(none) ->
read_prefs() ->
case file:consult(prefs_path()) of
{ok, Prefs} -> proplists:to_map(Prefs);
_ -> #{}
{ok, Prefs} ->
proplists:to_map(Prefs);
_ ->
#{gd_v_wallman => #{geometry => {582,335,500,300}}}
end.
src/gd_grids.erl
+1 -1
View File
@@ -37,7 +37,7 @@
%%% @end
-module(gd_grids).
-vsn("0.5.5").
-vsn("0.5.6").
-author("Craig Everett <craigeverett@qpq.swiss>").
-copyright("QPQ AG <info@qpq.swiss>").
-license("GPL-3.0-or-later").
src/gd_gui.erl
+9 -8
View File
@@ -3,7 +3,7 @@
%%% @end
-module(gd_gui).
-vsn("0.5.5").
-vsn("0.5.6").
-author("Craig Everett <craigeverett@qpq.swiss>").
-copyright("QPQ AG <info@qpq.swiss>").
-license("GPL-3.0-or-later").
@@ -96,6 +96,7 @@ init(Prefs) ->
WallB = wxButton:new(Frame, ?wxID_ANY, [{label, "[none]"}, {style, ?wxBORDER_NONE}]),
WallW = #w{name = wallet, id = wxButton:getId(WallB), wx = WallB},
ChainB = wxButton:new(Frame, ?wxID_ANY, [{label, "[ChainID]"}, {style, ?wxBORDER_NONE}]),
_ = wxButton:disable(ChainB),
ChainW = #w{name = chain, id = wxButton:getId(ChainB), wx = ChainB},
NodeB = wxButton:new(Frame, ?wxID_ANY, [{label, "[Node]"}, {style, ?wxBORDER_NONE}]),
NodeW = #w{name = node, id = wxButton:getId(NodeB), wx = NodeB},
@@ -181,10 +182,10 @@ init(Prefs) ->
#w{wx = Refresh} = lists:keyfind(refresh, #w.name, Buttons),
HistoryWin = wxScrolledWindow:new(Frame),
HistorySz = wxBoxSizer:new(?wxVERTICAL),
ok = wxScrolledWindow:setSizerAndFit(HistoryWin, HistorySz),
ok = wxScrolledWindow:setScrollRate(HistoryWin, 5, 5),
% HistoryWin = wxScrolledWindow:new(Frame),
% HistorySz = wxBoxSizer:new(?wxVERTICAL),
% ok = wxScrolledWindow:setSizerAndFit(HistoryWin, HistorySz),
% ok = wxScrolledWindow:setScrollRate(HistoryWin, 5, 5),
_ = wxSizer:add(MainSz, ChainSz, zxw:flags(base)),
_ = wxSizer:add(MainSz, AccountSz, zxw:flags(base)),
@@ -192,7 +193,7 @@ init(Prefs) ->
_ = wxSizer:add(MainSz, DetailsSz, zxw:flags(base)),
_ = wxSizer:add(MainSz, ActionsSz, zxw:flags(base)),
_ = wxSizer:add(MainSz, Refresh, zxw:flags(base)),
_ = wxSizer:add(MainSz, HistoryWin, zxw:flags(wide)),
% _ = wxSizer:add(MainSz, HistoryWin, zxw:flags(wide)),
ok = wxFrame:setSizer(Frame, MainSz),
ok = wxSizer:layout(MainSz),
@@ -207,8 +208,8 @@ init(Prefs) ->
picker = Picker,
id = ID_W,
balance = Balance,
buttons = Buttons,
history = #h{win = HistoryWin, sz = HistorySz}},
buttons = Buttons},
% history = #h{win = HistoryWin, sz = HistorySz}},
{Frame, State}.
src/gd_jt.erl
+1 -1
View File
@@ -15,7 +15,7 @@
%%% translation library is retained).
-module(gd_jt).
-vsn("0.5.5").
-vsn("0.5.6").
-export([read_translations/1, j/2, oneshot_j/2]).
src/gd_sophia_editor.erl
+1 -1
View File
@@ -1,5 +1,5 @@
-module(gd_sophia_editor).
-vsn("0.5.5").
-vsn("0.5.6").
-export([new/1, update/2,
get_text/1, set_text/2]).
src/gd_sup.erl
+1 -1
View File
@@ -12,7 +12,7 @@
%%% @end
-module(gd_sup).
-vsn("0.5.5").
-vsn("0.5.6").
-behaviour(supervisor).
-author("Craig Everett <craigeverett@qpq.swiss>").
-copyright("QPQ AG <info@qpq.swiss>").
src/gd_v.erl
+1 -1
View File
@@ -1,5 +1,5 @@
-module(gd_v).
-vsn("0.5.5").
-vsn("0.5.6").
-author("Craig Everett <craigeverett@qpq.swiss>").
-copyright("QPQ AG <info@qpq.swiss>").
-license("GPL-3.0-or-later").
src/gd_v_devman.erl
+1 -1
View File
@@ -1,5 +1,5 @@
-module(gd_v_devman).
-vsn("0.5.5").
-vsn("0.5.6").
-author("Craig Everett <craigeverett@qpq.swiss>").
-copyright("QPQ AG <info@qpq.swiss>").
-license("GPL-3.0-or-later").
src/gd_v_netman.erl
+1 -1
View File
@@ -1,5 +1,5 @@
-module(gd_v_netman).
-vsn("0.5.5").
-vsn("0.5.6").
-author("Craig Everett <zxq9@zxq9.com>").
-copyright("QPQ AG <info@qpq.swiss>").
-license("GPL-3.0-or-later").
src/gd_v_wallman.erl
+1 -1
View File
@@ -1,5 +1,5 @@
-module(gd_v_wallman).
-vsn("0.5.5").
-vsn("0.5.6").
-author("Craig Everett <zxq9@zxq9.com>").
-copyright("QPQ AG <info@qpq.swiss>").
-license("GPL-3.0-or-later").