anchor.diff:             #config{flows = Flows} = Config) ->
   
       ModFun = fun(Flow) ->
  -                     NewPriority =
  -                         case Priority of
  -                             {_P, _Pr}           -> Priority;
  -                             Pr when is_list(Pr) -> Priority;
  -                             _Pr       ->
  -                                 {P, _OldP} = Flow#flow.priority,
  -                                 {P, Priority}
  -                         end,
  -                     Flow#flow{priority = NewPriority}
  +                     {mod_flow, Flow#flow{priority = Priority}}
  +             end,
  +    modify_flow_if_exist(Id, Flows, ModFun, Config);
  +
  +do_request({set_flow_filter, Id, Filter},
  +           #config{flows = Flows} = Config) ->
  +
  +    ModFun = fun(Flow) ->
  +                     {mod_flow, Flow#flow{filter = Filter}}
  +             end,
  +    modify_flow_if_exist(Id, Flows, ModFun, Config);
  +
  +do_request({set_flow_loggers, Id, Loggers},
  +           #config{flows = Flows} = Config) ->
  +
  +    ModFun = fun(Flow) ->
  +                     {mod_flow, Flow#flow{loggers = Loggers}}
                end,
       modify_flow_if_exist(Id, Flows, ModFun, Config);
   
  
positive.code: set_flow_priority(Id, Priority) ->
      gen_server:call(?SERVER, {set_flow_priority, Id, Priority}).
  
  disable_flow(Id) ->
      gen_server:call(?SERVER, {disable_flow, Id}).
  
  
negative.code:         false ->
              {{error, {undefined_flow, Id}}, Config};
          Flow ->
              case ModFun(Flow) of
                  {mod_flow, ModFlow} ->
                      NewFlows = lists:keyreplace(Id, #flow.id, Flows, ModFlow),
                      NewConfig = Config#config{flows = NewFlows},
                      new_config_if_successfully_applied(NewConfig, Config);
                  {mod_flows, ModFlows} ->
                      NewConfig = Config#config{flows = ModFlows},
                      new_config_if_successfully_applied(NewConfig, Config);
                  {config, ModConfig}->
                      new_config_if_successfully_applied(ModConfig, Config);
                  Error ->
                      {{error, Error}, Config}
              end
      end.
  
  new_config_if_successfully_applied(NewConfig, OldConfig) ->
      try apply_config(NewConfig) of
          ok    -> {ok, NewConfig};
          Error -> {{error, Error}, OldConfig}
      catch
          E:W ->
              {{E, W}, OldConfig}
      end.
  
  apply_config(#config{flows = Flows}) ->
      alog_parse_trans:load_config(configs_to_internal_form(Flows)).
  
  configs_to_internal_form(Flows) ->
      ToInternaFlow = 
  