anchor.diff:      end.
   
   clusters() ->
  -    Clusters = re_config:clusters(),
  +    Clusters = lists:keysort(1, re_config:clusters()),
       Mapped = [cluster_info(Cluster) || Cluster <- Clusters],
       [{clusters, Mapped}].
   
  
positive.code: 
  bucket_types(Node) ->
      load_patch(Node),
      List = remote(Node, re_riak_patch, bucket_types, []),
      [{bucket_types, List}].
  
  create_bucket_type(Node, BucketType, RawValue) ->
  
negative.code:         RiakNode when is_atom(RiakNode) ->
              case remote(RiakNode, riak_core_ring_manager, get_my_ring, []) of
                  {ok, MyRing} ->
                      Nodes0 = remote(RiakNode, riak_core_ring, all_members, [MyRing]),
                      Nodes = lists:sort(Nodes0),
                      WithIds = lists:map(fun(N) -> node_info(N) end, Nodes),
                      [{nodes, WithIds}];
                  _ -> [{nodes, []}]
  