anchor.diff:  list_head() ->
       "    <pre><img SRC=\"/icons/blank.gif\" ALT=\"     \"> "
       "<a HREF=\"?N=D\">Name</a>                   "
  -    "<a HREF=\"?M=A\">Last modified</a>                     "
  -    " <a HREF=\"?S=A\">Size</a>             "
  +    "<a HREF=\"?M=A\">Last modified</a>                 "
  +    " <a HREF=\"?S=A\">Size</a>   "
       "<a HREF=\"?D=A\">Description</a> \n"
       "<hr> \n".
   
  
positive.code:     Body = [doc_head(DirName), 
  	    list_head(), 
  	    L,
  	    "\n</pre>\n<hr>\n",
  	    yaws:address(GC, SC),
  	    "</body>\n</html>\n"],
      B = list_to_binary(Body),
  
negative.code:     yaws_server:deliver_accumulated(#dcc{}, CliSock, GC, SC),
      done.
  
  inline_readme(SC,DirName,L) ->
      F = fun("README", _Acc) ->
  		File = SC#sconf.docroot ++ DirName ++ [$/ | "README"],
  		{ok,Bin} = file:read_file(File),
  		binary_to_list(Bin);
  	   (_, Acc) ->
  		Acc
  	end,
      lists:foldl(F,[],L).
  
  
  doc_head(DirName) ->
  