anchor.diff:  		[{h2, ["Invalid stuff happened"]},
   		 {p, [{"class", "important error code"}], [ReasonS]}],
   	    Body = lists:map(fun html:to_iolist/1, HTML),
  -	    html_ok(Req, Body)
  +	    Req:respond({406, [{"Content-type", ?MIME_XHTML}], html_skeleton(Body)})
       end;
   
   request(Req, 'GET', "") ->
  
positive.code:     end.
  
  html_ok(Req, Body) ->
      Req:ok(html_skeleton(Body)).
  
  html_skeleton(Body) ->
      {?MIME_XHTML,
  	    [<<"<?xml version='1.0' encoding='utf-8'?>
  <!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Strict//EN' 'DTD/xhtml1-strict.dtd'>
  <html xmlns='http://www.w3.org/1999/xhtml' lang='de' xml:lang='de'>
  
negative.code: 	    Body = lists:map(fun html:to_iolist/1, HTML),
  	    html_ok(Req, Body);
  	not_found ->
  	    html_not_found(Req)
      end;
  
  request(Req, 'GET', Path) ->
  