anchor.diff:  decode_key(K64) ->
       base64:decode(dirty(K64)).
   
  --endif. % SLF_LAZY
  -
  --ifdef(TEST).
   %% @spec dirty(string()) -> string()
   %% @doc replace filename-troublesome base64 characters
   %% @see clean/1
  
positive.code:         {error, Err} -> {error, Err, State}
      end.
  
  -ifdef(SLF_COMMENT).
  
  %% @spec list(state()) -> [{Bucket :: riak_object:bucket(),
  %%                          Key :: riak_object:key()}]
  %% @doc Get a list of all bucket/key pairs stored by this backend
  list(State) ->
      % this is slow slow slow
      %                                              B,N,N,N,K
      [location_to_bkey(X) || X <- filelib:wildcard("*/*/*/*/*",
                                                    State#state.dir)].
  
  
  %% @spec list_bucket(state(), riak_object:bucket()) ->
  %%           [riak_object:key()]
  
negative.code:                  (C)  -> C
                end,
                Str64).
  
  -ifdef(SLF_COMMENT).
  
  
  -endif. % SLF_LAZY
  
  -ifdef(TEST).
  -endif. % TEST
  
  %% @spec encode_bucket(binary()) -> string()
  