anchor.diff:  to_utf8(X) when is_list(X) -> unicode:characters_to_binary(X, utf8);
   to_utf8(X)                 -> X.
   
  -to_list(X) when is_list(X)    -> X;
  -to_list(X) when is_atom(X)    -> atom_to_list(X);
  -to_list(X) when is_tuple(X)   -> tuple_to_list(X);
  -to_list(X) when is_binary(X)  -> binary_to_list(X);
  -to_list(X) when is_integer(X) -> integer_to_list(X).
  -
   %%%_* Emacs ============================================================
   %%% Local Variables:
   %%% allout-layout: t
  
positive.code: %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  %%% @doc Klarna Api Testing Tool.
  %%%
  %%% Use for shooting requests against any kind of http interface
  %%% (e.g. json, xml) and verifying the response.
  
negative.code: 
  %% Transform simple list to proplist with keys named Name1, Name2 etc.
  enumerate(L, Name) ->
    Keys = [tulib_lists:to_list(Name) ++ integer_to_list(N)
            || N <- lists:seq(1, length(L))],
    lists:zip(Keys, L).
  
  %% Transform response record to proplist for validation.
  