summaryrefslogtreecommitdiff
path: root/src/mod_vcard_mnesia.erl
diff options
context:
space:
mode:
authorEvgeniy Khramtsov <ekhramtsov@process-one.net>2017-05-18 21:24:47 +0300
committerEvgeniy Khramtsov <ekhramtsov@process-one.net>2017-05-18 21:24:47 +0300
commit0ed23980a6dafc0352b2ef066c18167199ccf5ab (patch)
treebf9261ff2233ceaeab62406a7c622ffa1966aefa /src/mod_vcard_mnesia.erl
parentThe default 'iqdisc' is now 'no_queue' (diff)
Get rid of Mnesia transaction in get_vcard/2
Diffstat (limited to 'src/mod_vcard_mnesia.erl')
-rw-r--r--src/mod_vcard_mnesia.erl8
1 files changed, 2 insertions, 6 deletions
diff --git a/src/mod_vcard_mnesia.erl b/src/mod_vcard_mnesia.erl
index 9dc3d860..d2f4ef52 100644
--- a/src/mod_vcard_mnesia.erl
+++ b/src/mod_vcard_mnesia.erl
@@ -62,12 +62,8 @@ is_search_supported(_ServerHost) ->
get_vcard(LUser, LServer) ->
US = {LUser, LServer},
- F = fun () -> mnesia:read({vcard, US}) end,
- case mnesia:transaction(F) of
- {atomic, Rs} ->
- {ok, lists:map(fun (R) -> R#vcard.vcard end, Rs)};
- {aborted, _Reason} -> error
- end.
+ Rs = mnesia:dirty_read(vcard, US),
+ {ok, lists:map(fun (R) -> R#vcard.vcard end, Rs)}.
set_vcard(LUser, LServer, VCARD, VCardSearch) ->
US = {LUser, LServer},