anchor.diff:  %% "new" cluster commands:
   %%
   %% status, partition-count, partitions, partition-id, partition-index
  -%% members
   %%
   %% The "old" command implementations for join, leave, plan, commit,
   %% etc are in `riak_core_console.erl'
  -%%
  -%% @TODO: Move implementation of old commands here?
   
   -module(riak_core_cluster_cli).
   
  
positive.code:     clique:register_usage(["riak-admin", "cluster", "status"], status_usage()),
      clique:register_usage(["riak-admin", "cluster", "partition"], partition_usage()),
      clique:register_usage(["riak-admin", "cluster", "partitions"], partitions_usage()),
      clique:register_usage(["riak-admin", "cluster", "partition_count"], partition_count_usage()),
      clique:register_usage(["riak-admin", "cluster", "members"], members_usage()).
  
  register_all_commands() ->
      lists:foreach(fun(Args) -> apply(clique, register_command, Args) end,
                    [status_register(), partition_count_register(),
                     partitions_register(), partition_register(),
                     members_register()]).
  
  %%%
  %% Cluster status
  
negative.code:     Text = [clique_status:text(Iolist)],
      clique_status:alert(Text).
  
  hash_to_partition_id(Hash, RingSize) ->
      riak_core_ring_util:hash_to_partition_id(Hash, RingSize).
  
  partition_id_to_hash(Id, RingSize) ->
      riak_core_ring_util:partition_id_to_hash(Id, RingSize).
      
  