global trans & register

[Roberto Ostinelli]

Dear list,
I'm trying to run some code only once when the first node starts a cluster.
I'm using at the beginning of the app:

  Self = self(),
  global:trans({?MODULE, ?MODULE},
        fun() ->
            case global:whereis_name(my_flag) of
                undefined ->
                    error_logger:info_msg("RUN ON ~p", [node()]),
                    global:register_name(my_flag, Self);

                _ ->
                    ok
            end
        end)

The result is that RUN ON XX is in every cluster node log.

Can some kind soul tell me what I'm missing?

Thank you,
r.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://erlang.org/pipermail/erlang-questions/attachments/20211215/3667906c/attachment.htm>