anchor.diff:  datetime_to_unix_time({{_,_,_},{_,_,_}} = DateTime) ->
       calendar:datetime_to_gregorian_seconds(DateTime) - ?UNIX_EPOCH.
   
  -get_opt(K, Opts) ->
  -    case lists:keyfind(K, 1, Opts) of
  -	{_, V} -> V;
  -	false  -> error({required, K})
  -    end.
  -
   get_opt(K, Opts, Default) ->
       case lists:keyfind(K, 1, Opts) of
   	{_, V} -> V;
  
positive.code: 				     type_spec = TypeSpec} = St) ->
      io:format("report~n"),
  
      Type = find_type(TypeSpec, name(Metric, DataPoint)),
      Request = "PUTVAL " ++ HostName ++ "/" ++  
  	PluginName ++ "-" ++ PluginInstance ++ "/" ++
  	Type ++ "-" ++ name(Metric, DataPoint) ++ " " ++
  
negative.code: -define(RECONNECT_INTERVAL, 30). %% seconds
  -define(READ_TIMEOUT, 5000).
  -define(REFRESH_INTERVAL, 10). %% seconds
  -define(DEFAULT_PATH, "/var/run/collectd-unixsock").
  
  -record(st, {
  	  hostname = undefined,
  