anchor.diff:  	end.
   
   -spec update_subscriber_password(Subscriber :: string(), OldPassword :: string() | binary(),
  -	NewPassword :: string() | binary())-> ok | {error, Reason :: term()}.
  +	NewPassword :: string() | binary())-> ok.
   %% @doc Update a new subscriber password
   %%
   %% Generate a new password using ocs:generate_password/0.
  
positive.code: 
  -spec find_subscriber(Subscriber :: string() | binary()) ->
  	Result :: {ok, Password :: binary(), Attributes :: binary() | [byte()],
  	Balance :: interger()} | {error, Reason}.
  %% @doc Look up a subscriber and return the password and attributes assigned.
  %%
  find_subscriber(Subscriber) when is_binary(Subscriber) ->
  
negative.code: 	case find_subscriber(Subscriber) of
  		{ok, Password, _, Balance} ->
  			F = fun() ->
  				mnesia:delete(subscriber, Subscriber, write)
  			end,
  			case mnesia:transaction(F) of
  				{atomic, []} ->
  					exit(not_found);
  				{atomic, _} ->
  					case add_subscriber(Subscriber, Password, Attributes, Balance) of
  						ok ->
  							ok;
  						{error, Reason} ->
  							exit(Reason)
  					end;
  				{aborted, Reason} ->
  					exit(Reason)
  			end;
  		{ok, _, _, _} ->
  			exit(current_password_not_matched);
  		{error, Reason} ->
  			exit(Reason)
  	end.
  
  -spec log_file(FileName :: string()) -> ok.
  