anchor.diff:  
   %% Sanitization functions
   
  -fix_feed(Feed, #state{url = BaseURL} = _State) ->
  +fix_feed(Feed, #state{url = BaseURL} = State) ->
       %% Linkify
  -    Feed2 = Feed#feed{link = url:to_string(
  -			       url:join(BaseURL, Feed#feed.link))},
  -    Feed2.
  +    Link = url:to_string(
  +	     url:join(BaseURL, Feed#feed.link)),
  +    %% Sanitization
  +    Description =
  +	case Feed#feed.description of
  +	    undefined -> "";
  +	    Description1 ->
  +		fix_html(Description1, State)
  +	end,
  +    Feed#feed{link = Link,
  +	      description = Description}.
   
   %% may return false
   fix_entry(#entry{id = Id,
   		 description = Description,
  -		 link = Link} = Entry, #state{url = BaseURL}) ->
  +		 link = Link} = Entry, #state{url = BaseURL} = State) ->
       if
   	%% Only entries with link
   	is_list(Entry#entry.link) ->
  
positive.code: 	    Description3 = if
  			       is_list(Description) ->
  				   {ok, Description2} = tidy:tidy(Description),
  				   Description2;
  			       true ->
  				   ""
  			   end,
  
negative.code: 	true ->
  	    false
      end.
  
  
  fix_html(String, State) ->
      Tree = tagsoup_reader:parse(String),
      Tree2 = fix_html_children(Tree, State),
      xml_writer:to_string(Tree2).
  
  fix_html_el({Name, Attrs, Children}, State) ->
      case string:to_lower(Name) of
  	"script" -> "";
  	"style" -> "";
  	"a" ->
  	    {Name, absolutize_href_attr("href", Attrs, State#state.url),
  	     fix_html_children(Children, State)};
  	"img" ->
  	    {Name, absolutize_href_attr("src", Attrs, State#state.url),
  	     fix_html_children(Children, State)};
  	_ ->
  	    {Name, Attrs,
  	     fix_html_children(Children, State)}
      end.
  
  fix_html_children(Children, State) ->
      [case Child of
  	 {_, _, _} -> fix_html_el(Child, State);
  	 {text, _} -> Child
       end
       || Child <- Children].
  
  absolutize_href_attr(_, [], _) ->
      [];
  absolutize_href_attr(AttrName, [{AttrName, Href} | Attrs], BaseURL) ->
      Href2 = url:to_string(url:join(BaseURL, Href)),
      if
  	Href =/= Href2 ->
  	    error_logger:info_msg("Absolutized: ~p -> ~p~n", [Href, Href2]);
  	true ->
  	    ok
      end,
      [{AttrName, Href2} | Attrs];
  absolutize_href_attr(AttrName, [Attr | Attrs], BaseURL) ->
      [Attr | absolutize_href_attr(AttrName, Attrs, BaseURL)].
      
  
  %% #feed{} emitter
  feed_info_complete(#state{feed_info_done = false,
  