anchor.diff:  	sanitize1(iolist_to_binary(["<sanitize>", Html, "</sanitize>"])).
   
   sanitize1(Html) ->
  -	Parsed = mochiweb_html:parse(Html),
  +	Parsed = mochiweb_html:parse(ensure_escaped_amp(Html)),
   	Sanitized = sanitize(Parsed, []),
   	flatten(Sanitized).
   
   	sanitize(B, _Stack) when is_binary(B) ->
  -		B;
  +		escape(B);
   	sanitize({comment, Text}, _Stack) ->
   		{comment, Text};
   	sanitize({Elt,Attrs,Enclosed}, Stack) ->
  
positive.code:         nomatch ->
              []
      end.
  
negative.code: 	noscript/1,
      escape_link/1,
      nl2br/1,
      scrape_link_elements/1,
      ensure_escaped_amp/1
  ]).
  
  -include_lib("zotonic.hrl").
  