anchor.diff:  	    return(From,result_summary_frame1(State)),
   	    loop(State);
   	stop_reload_results ->
  -	    file:set_cwd(State#state.start_dir),
  +	    ok = file:set_cwd(State#state.start_dir),
   	    loop(State#state{reload_results=false});
   	{no_result_log_frame,From} ->
   	    return(From,no_result_log_frame1()),
  
positive.code: ct_install(#state{config=Config,event_handler=EvHandlers,
  		  current_log_dir=LogDir}) ->
      ct_run:install([{config,Config},{event_handler,EvHandlers}],LogDir).
      
  %%%-----------------------------------------------------------------
  %%% HTML
  start_page1() ->
  
negative.code:     end.
  
  return({To,Ref},Result) ->
      To ! {Ref, Result},
      ok.
  
  run_test1(State=#state{tests=Tests,current_log_dir=LogDir,
  		       logopts=LogOpts}) ->
  