From 1391d5a3045e1a02e42d04e5e87d82cbd75d4a38 Mon Sep 17 00:00:00 2001
From: Evgeniy Khramtsov <ekhramtsov@process-one.net>
Date: Wed, 17 May 2017 17:42:22 +0300
Subject: [PATCH] Use disc_only_copies for oauth_token Mnesia table

---
 src/ejabberd_oauth_mnesia.erl | 15 +++++++++++++--
 1 file changed, 13 insertions(+), 2 deletions(-)

diff --git a/src/ejabberd_oauth_mnesia.erl b/src/ejabberd_oauth_mnesia.erl
index 8908afd39..c84174655 100644
--- a/src/ejabberd_oauth_mnesia.erl
+++ b/src/ejabberd_oauth_mnesia.erl
@@ -29,17 +29,28 @@
 -export([init/0,
          store/1,
          lookup/1,
-         clean/1]).
+         clean/1,
+	 use_cache/0]).
 
 -include("ejabberd_oauth.hrl").
 
 init() ->
     ejabberd_mnesia:create(?MODULE, oauth_token,
-                        [{disc_copies, [node()]},
+                        [{disc_only_copies, [node()]},
                          {attributes,
                           record_info(fields, oauth_token)}]),
     ok.
 
+use_cache() ->
+    case mnesia:table_info(oauth_token, storage_type) of
+	disc_only_copies ->
+	    ejabberd_config:get_option(
+	      oauth_use_cache,
+	      ejabberd_config:use_cache(global));
+	_ ->
+	    false
+    end.
+
 store(R) ->
     mnesia:dirty_write(R).