anchor.diff:  check_exists(File) ->
       case file:read_file_info(File) of
   	{ok,#file_info{type=regular}} -> File;
  -	_ -> 
  +	_ ->
   	    exit({error,no_file})
  -    end.
  -	
  -
  -get_handler(Handler,Traci) ->
  -    case Handler of
  -	undefined -> 
  -	    case dict:find(handler,Traci) of
  -		{ok,[H]} -> H;
  -		error -> {fun defaulthandler/4, initial}
  -	    end;
  -	_ ->
  -	    Handler
       end.
   
   do_format(Fd,Details,DisableSort,Handler) ->
  
positive.code:             Absname = filename:absname(Dir),
  	    io:format("Stored logs in ~s~n",[Absname]),
  	    case FetchOrFormat of
  		format -> format(Dir);
  		fetch -> ok
  	    end,
  	    Sender ! {?MODULE,{stopped,Absname}}
           ?get_status
  
negative.code: 			  ets:insert(?MODULE,{Pid,PI,Node})
  		  end,Proci),
      FileOrWrap = get_file(File,Traci),
      {FileOrWrap,Traci,Handler}.
  
  format_opt(Opt) when is_list(Opt) ->
      Out = case lists:keysearch(out,1,Opt) of
  