anchor.diff:  			end,
   			Classes = case Io of
   						  String when is_list(String) ->
  -							  Prefix = filename:join(State#?MODULE.dir, String),
  -							  [{Class, Current, {Prefix, undefined, undefined}} | Rest];
  +							  [{Class, Current, {Dir, String, undefined, 0, 0, L, undefined}} | Rest];
   						  _ ->
   							  [{Class, Current, Io} | Rest]
   					  end,
  
positive.code: 			case Io of
  				none ->
  					{ok, Last, Io};
  				{Prefix, Suffix, File} ->
  					NewIo = update_datelog({Prefix, Suffix, File}, Log, Terms),
  					consume_log(Log, Current, NewIo);
  				_ ->
  					lists:foreach(fun(Term) -> print_log(Io, Log, Term) end, Terms),
  
negative.code: -record(?MODULE, {dir = "priv/log" :: string(),
  				  max_bytes = 1048576 :: integer(),
  				  max_files = 10 :: integer(),
  				  classes = [] :: [{atom(), term(),
  									none | standard_io | pid() |
  									{string(), string(), string(), integer(), integer(), integer(), pid()}}],
  				  interval = 100 :: timeout()}).
  
  -export([init/1, handle_call/3, handle_cast/2, handle_info/2, terminate/2, code_change/3]).
  