Debugging, improved logging, etc.

src/gm_ctflow_worker_sup.erl

@@ -12,8 +12,15 @@
 
 -export([init/1]).
 
+-export([reset/0]).
+
 -define(SERVER, ?MODULE).
 
+reset() ->
+    [ok = supervisor:terminate_child(?MODULE, Id)
+     || {Id, _, _, _} <- supervisor:which_children(?MODULE)],
+    ok.
+
 start_link() ->
     supervisor:start_link({local, ?SERVER}, ?MODULE, []).
 
@@ -27,7 +34,6 @@ start_link() ->
 %%                  type => worker(),       % optional
 %%                  modules => modules()}   % optional
 init([]) ->
-    gm_ctflow_worker:init_reg(),
     SupFlags = #{
         strategy => simple_one_for_one,
         intensity => 0,