anchor.diff:      Path;
   canonical_path(Path) ->
       NoDoubles = re:replace(Path, "/+/", <<"/">>, [{return, binary}, global]),
  -    re:replace(NoDoubles, "/$", % fix emacs erlang-mode: "
  -               "", [{return, binary}]).
  +    Path1 = re:replace(NoDoubles, "/$", % fix emacs erlang-mode: "
  +                       "", [{return, binary}]),
  +    %% remove query parameters
  +    re:replace(Path1, "\\?.*$", "", [{return, binary}]).
  +
   
   %% @doc Canonicalize HTTP method as all uppercase binary
   
  
positive.code: 
  hashed_path_test() ->
      ?assertEqual(?hashed_path, hash_string(canonical_path(?path))).
  
  hashed_body_test() ->
      ?assertEqual(?hashed_body, hashed_body(?body)).
  
negative.code: -ifdef(TEST).
  
  -define(path, <<"/organizations/clownco">>).
  -define(path_with_query, <<"/organizations/clownco?a=1&b=2">>).
  -define(hashed_path, <<"YtBWDn1blGGuFIuKksdwXzHU9oE=">>).
  
  -define(body, <<"Spec Body">>).
  