anchor.diff:  		{Rest,[$;|Acc]};
   	get_entity([C|Rest], Acc) ->
   		get_entity(Rest, [C|Acc]).
  +
  +
  +%% @doc Split the binary into lines. Line seperators can be \r, \n or \r\n.
  +split_lines(B) when is_binary(B) ->
  +	split_lines(B, <<>>, []).
   	
  +	split_lines(<<>>, Line, Acc) ->
  +		lists:reverse([Line|Acc]);
  + 	split_lines(<<13,10,Rest/binary>>, Line, Acc) ->
  +		split_lines(Rest, <<>>, [Line|Acc]);
  + 	split_lines(<<13,Rest/binary>>, Line, Acc) ->
  +		split_lines(Rest, <<>>, [Line|Acc]);
  + 	split_lines(<<10,Rest/binary>>, Line, Acc) ->
  +		split_lines(Rest, <<>>, [Line|Acc]);
  +	split_lines(<<C, Rest/binary>>, Line, Acc) ->
  +		split_lines(Rest, <<Line/binary, C>>, Acc).
  
positive.code:     to_upper/1,
      replace/3,
  	truncate/2,
  	truncate/3
  ]).
  
  -include_lib("include/zotonic.hrl").
  
  
  %% @doc Remove whitespace at the start and end of the string
  %% @todo Check if we want to use a regexp (re) instead, needed for stripping newline, tab etc.
  trim(S) -> string:strip(S, both).
  
  
  %% @doc Check if the variable is a one dimensional list, probably a string
  
negative.code: %% interface functions
  -export([
      trim/1,
  	trim_left/1,
  	trim_right/1,
      is_string/1,
      line/1,
      to_rootname/1,
  