anchor.diff:  	{error,<<"ERR invalid DB index">>} = erldis_client:sr_scall(Client, [<<"select">>, -1]),
   	ok = erldis_client:sr_scall(Client, [<<"select">>, a]).
   
  +auth(Config) ->
  +	{client,Client} = lists:keyfind(client, 1, Config),
  +	Pwd = <<"hhedls56329">>,
  +	
  +	[ok] = erldis_client:scall(Client, [<<"config">>,<<"set">>,<<"requirepass">>, Pwd]),
  +	{ok,NewClient} = connect_erldis(10), 
  +	{error,<<"ERR operation not permitted">>} = erldis_client:sr_scall(NewClient, <<"ping">>),
  +	
  +	[{error,<<"ERR invalid password">>}] = erldis_client:scall(NewClient, [<<"auth">>, <<"bad_pass">>]),
  +	{error,<<"ERR operation not permitted">>} = erldis_client:sr_scall(NewClient, <<"ping">>),
  +	
  +	[ok] = erldis_client:scall(NewClient, [<<"auth">>, Pwd]),
  +	pong = erldis_client:sr_scall(NewClient, <<"ping">>).
  +
   quit(Config) ->
   	{client,Client} = lists:keyfind(client, 1, Config),
   	shutdown = erldis_client:stop(Client).
  
positive.code: -compile(export_all).
  
  all() ->
  	[auth,
  	 echo,
  	 ping,
  	 select,
  	 quit].
  
  init_per_suite(Config) ->
  	{ok,Client} = connect_erldis(10),
  	NewConfig=[{client,Client}|Config],
  	NewConfig.
  
  connect_erldis(0) -> {error,{socket_error,econnrefused}};
  
negative.code: 		{ok,Client} -> {ok,Client};
  		_ -> connect_erldis(Times - 1)
  	end.
  
  echo(Config) ->
  	{client,Client} = lists:keyfind(client, 1, Config),
  