anchor.diff:      (get(outh))#outh.content_encoding.
   
   outh_get_content_type() ->
  -    [_, Mime, _] = (get(outh))#outh.content_type,
  -    Mime.
  +    case (get(outh))#outh.content_type of
  +        undefined    -> undefined;
  +        [_, Mime, _] -> Mime
  +    end.
   
   outh_serialize() ->
       H = get(outh),
  
positive.code:            encoding          = Encoding,
             date              = make_date_header(),
             server            = make_server_header(),
             last_modified     = make_last_modified_header(UT#urltype.finfo),
             expires           = make_expires_header(UT#urltype.mime,
                                                     UT#urltype.finfo),
             cache_control     = make_cache_control_header(UT#urltype.mime,
                                                           UT#urltype.finfo),
             etag              = make_etag_header(UT#urltype.finfo),
             content_range     = make_content_range_header(Range),
             content_length    = make_content_length_header(Length),
  
negative.code:     ok.
  
  outh_set_content_type(Mime) ->
      put(outh_mime_type, Mime),
      put(outh, (get(outh))#outh{content_type = make_content_type_header(Mime)}),
      ok.
  
  