WIP

src/gd_con.erl

@@ -330,21 +330,25 @@ start_link() ->
 init(none) ->
     ok = log(info, "Starting"),
     process_flag(sensitive, true),
-    Prefs = read_prefs(),
+    {FirstRun, Prefs} = read_prefs(),
     GUI_Prefs = maps:get(gd_gui, Prefs, #{}),
     Window = gd_gui:start_link(GUI_Prefs),
     Wallets = get_prefs(wallets, Prefs, []),
     T = erlang:send_after(tic(), self(), tic),
     State = #s{window = Window, timer = T, wallets = Wallets, prefs = Prefs},
     NewState = do_show_ui(gd_v_wallman, State),
-    ok = gd_v_wallman:first_run(),
+    ok =
+        case FirstRun of
+            false -> ok;
+            true  -> gd_v_wallman:first_run()
+        end,
     {ok, NewState}.
 
 
 read_prefs() ->
     case file:consult(prefs_path()) of
-        {ok, Prefs} -> proplists:to_map(Prefs);
-        _           -> #{}
+        {ok, Prefs} -> {false, proplists:to_map(Prefs)};
+        _           -> {true, #{}}
     end.