anchor.diff:  									S = #subscriber{name = Identity,
   											password = Password, attributes = Attributes,
   											buckets = Buckets, enabled = EnabledStatus,
  -											multisession = MSessions},
  +											multisession = MultiSession},
   									ok = mnesia:write(S),
   									S;
   								[_] ->
  
positive.code: 		Reason :: not_found | term().
  %% @doc Update subscriber attributes.
  %%
  update_attributes(Identity, Buckets, Attributes, EnabledStatus, MSessions)
  		when is_list(Identity), is_list(Buckets), is_boolean(EnabledStatus),
  		is_boolean(MSessions) ->
  	update_attributes(list_to_binary(Identity), Buckets, Attributes,
  		EnabledStatus, MSessions);
  update_attributes(Identity, Buckets, Attributes, EnabledStatus, MSessions)
  		when is_binary(Identity), is_list(Attributes) ->
  	F = fun() ->
  				case mnesia:read(subscriber, Identity, write) of
  					[Entry] ->
  						NewEntry = Entry#subscriber{attributes = Attributes,
  							buckets = Buckets, enabled = EnabledStatus,
  							multisession = MSessions},
  						mnesia:write(subscriber, NewEntry, write);
  					[] ->
  						throw(not_found)
  
negative.code: 		{aborted, Reason} ->
  			{error, Reason}
  	end;
  add_subscriber(Identity, Password, Attributes, Buckets, EnabledStatus, MultiSession)
  		when is_binary(Identity), is_binary(Password), is_list(Attributes),
  		is_list(Buckets), is_boolean(EnabledStatus), is_boolean(MultiSession) ->
  	F1 = fun() ->
  				S = #subscriber{name = Identity, password = Password,
  						attributes = Attributes, buckets = Buckets,
  						enabled = EnabledStatus, multisession = MultiSession},
  				ok = mnesia:write(S),
  				S
  	end,
  