anchor.diff:  cgi_env(Arg, Scriptfilename, Pathinfo) ->
       H = Arg#arg.headers,
       R = Arg#arg.req,
  +    case R#http_request.path of
  +	{abs_path, RequestURI} -> ok;
  +	_ -> RequestURI = undefined
  +    end,
       {Maj,Min} = R#http_request.version,
       {Hostname, Hosttail}=lists:splitwith(fun(X)->X /= $: end, 
   					 checkdef(H#headers.host)),
       Hostport = case Hosttail of
  +
   		   [$: | P] -> P;
   		   [] -> "80"
   	       end,
  
positive.code: 
  
  cgi_worker(Parent, Arg, Exefilename, Scriptfilename, Pathinfo) ->
      CGIPort = open_port({spawn, Exefilename},
  			[{env, cgi_env(Arg, Scriptfilename, Pathinfo)}, 
  			 {cd, pathof(Scriptfilename)},
  			 exit_status,
  			 binary]),
  
negative.code: data_loop(Pid, Port) ->
      receive
  	{Port, {data,Data}} ->
   	    ?Debug("~p~n", [{data, binary_to_list(Data)}]),
  	    yaws_api:stream_chunk_deliver_blocking(Pid, Data),
  	    data_loop(Pid, Port);
  	{Port, {exit_status, Status}} ->
  