anchor.diff:      stop([]).
   stop(Opts) ->
       Fetch = stop_opts(Opts),
  -    case whereis(?MODULE) of
  -	undefined -> ok;
  -	Pid when is_pid(Pid) -> 
  -	    ?MODULE ! {stop,Fetch,self()},
  -	    receive {?MODULE,stopped} -> ok end
  -    end,
  -    stopped.
  +    Result =
  +        case whereis(?MODULE) of
  +            undefined -> ok;
  +            Pid when is_pid(Pid) ->
  +                ?MODULE ! {stop,Fetch,self()},
  +                receive {?MODULE,R} -> R end
  +        end,
  +    stop_return(Result,Opts).
   
   stop_opts(Opts) ->
       case lists:member(format,Opts) of
  
positive.code: 		  AllNodesAndMeta),
  	    ets:delete(?history_table),
  	    wait_for_fetch(AllNodes),
  	    io:format("Stored logs in ~s~n",[filename:absname(Dir)]),
  	    case FetchOrFormat of
  		format -> format(Dir);
  		fetch -> ok
  	    end,
  	    Sender ! {?MODULE,stopped}
           ?get_status
      end.
  
  
negative.code: 		  [Y,M,D,H,Min,S]).
  
  
  fetch(Localhost,Dir,Node,MetaFile) ->
      case (host(Node) == Localhost) orelse is_local(MetaFile) of
          true -> % same host, just move the files
  	    Files = get_filenames(Node,MetaFile),
  	    lists:foreach(
  	      fun(File0) ->
  		      File = filename:join(Dir,filename:basename(File0)),
  		      file:rename(File0,File)
  	      end,
  	      Files);
  	false ->
  	    {ok, LSock} = gen_tcp:listen(0, [binary,{packet,2},{active,false}]),
  	    {ok,Port} = inet:port(LSock),
  	    rpc:cast(Node,observer_backend,ttb_fetch,
  