anchor.diff:  
   do_request(get_flows, #config{flows = Flows} = Config) ->
       {{ok, Flows}, Config};
  +
  +do_request(print_flows, #config{flows = Flows} = Config) ->
  +    
  +    FormatFun = fun(#flow{id = Id, filter = Filter,
  +                          loggers = Loggers, enabled = Enabled
  +                         }, {FormatString, Vars}) ->
  +                        F = "id = ~w filter = ~w loggers = ~w enabled = ~w~n",
  +                        {FormatString ++ F,
  +                         Vars ++ [Id, Filter, Loggers, Enabled]
  +                        }
  +                end,
  +
  +    {Format, Args} = lists:foldl(FormatFun, {"",[]}, Flows),
  +    
  +    io:format(Format, Args),
  +    
  +    {ok, Config};
   
   do_request({add_new_flow, Filter, Priority, Loggers},
              #config{flows = Flows} = Config) ->
  
positive.code: handle_info(_Info, State) ->
      {noreply, State}.
  
  terminate(_Reason, _State) ->
      ok.
  
  code_change(_OldVsn, State, _Extra) ->
  
negative.code: get_flows() ->
      gen_server:call(?SERVER, get_flows).
  
  print_flows() ->
      gen_server:call(?SERVER, print_flows).
  
  set_flow_priority(Id, Priority) ->
      gen_server:call(?SERVER, {set_flow_priority, Id, Priority}).
  
  