anchor.diff:  -spec(format_bucket_list(list(tuple())) ->
                string()).
   format_bucket_list(Buckets) ->
  -    Header = lists:append(["[Buckets]\r\n",
  -                           " created at                | bucket (owner)\r\n",
  -                           "---------------------------+",
  -                           "----------------------------------------------------------------\r\n"
  -                          ]),
  +    {Col1Len, Col2Len} = lists:foldl(fun({Bucket, Owner, _}, {C1, C2}) ->
  +                                             Len1 = length(Bucket),
  +                                             Len2 = length(Owner),
  +
  +                                             {case (Len1 > C1) of
  +                                                  true  -> Len1;
  +                                                  false -> C1
  +                                              end,
  +                                              case (Len2 > C2) of
  +                                                  true  -> Len2;
  +                                                  false -> C2
  +                                              end}
  +                                     end, {0,0}, Buckets),
  +    Col3Len = 26,
  +    Header = lists:append(
  +               [string:left("bucket",     Col1Len), " | ",
  +                string:left("owner",      Col2Len), " | ",
  +                string:left("created at", Col3Len), "\r\n",
  +
  +                lists:duplicate(Col1Len, "-"), "-+-",
  +                lists:duplicate(Col2Len, "-"), "-+-",
  +                lists:duplicate(Col3Len, "-"), "\r\n"]),
  +
       Fun = fun({Bucket, Owner, Created}, Acc) ->
  -                  Acc ++ io_lib:format(" ~s | ~s (~s)\r\n",
  -                                       [leo_date:date_format(Created), Bucket, Owner])
  +                  Acc ++ io_lib:format("~s | ~s | ~s\r\n",
  +                                       [string:left(Bucket, Col1Len),
  +                                        string:left(Owner,  Col2Len),
  +                                        leo_date:date_format(Created)])
             end,
  -    lists:foldl(Fun, Header, Buckets).
  +    lists:append([lists:foldl(Fun, Header, Buckets), "\r\n"]).
   
   
   %% @doc Retrieve data-size w/unit.
  
positive.code:                     {error, SuspendError} ->
                          {io_lib:format("[ERROR] ~s\r\n",[SuspendError]), State}
                  end
         end,
      {reply, Reply, NewState};
  
  
  
negative.code:                           end,
                  {ok, {RingHash0, RingHash1}} = leo_redundant_manager_api:checksum(ring),
  
                  io_lib:format([]
                                ++ "[system config]\r\n"
                                ++ "             version : ~s\r\n"
                                ++ " # of replicas       : ~w\r\n"
                                ++ " # of successes of R : ~w\r\n"
                                ++ " # of successes of W : ~w\r\n"
                                ++ " # of successes of D : ~w\r\n"
                                ++ "           ring size : 2^~w\r\n"
                                ++ "    ring hash (cur)  : ~s\r\n"
                                ++ "    ring hash (prev) : ~s\r\n\r\n"
                                ++ "[node(s) state]\r\n",
                                [Version,
                                 SystemConf#system_conf.n,
                                 SystemConf#system_conf.r,
  