"sh_" -> "shr_".

3 files changed, 13 insertions, 13 deletions

diff --git a/src/shared/io/sh_database.erl b/src/shared/io/shr_database.erl
index 233e37d..bffcb9f 100644
--- a/src/shared/io/sh_database.erl
+++ b/src/shared/io/shr_database.erl
@@ -1,4 +1,4 @@
--module(sh_database).
+-module(shr_database).
 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %% TYPES %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
@@ -34,12 +34,12 @@ do_remote_operation (Op, Params) ->
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %% EXPORTED FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
--spec insert (atom(), any(), sh_db_user:permission(), any()) -> 'ok'.
+-spec insert (atom(), any(), shr_db_user:permission(), any()) -> 'ok'.
 insert (DB, ObjectID, Permission, Value) ->
    {atomic, _} = do_remote_operation(insert, [DB, ObjectID, Permission, Value]),
    io:format
    (
-      "~nsh_database:insert(~p) -> ok.~n",
+      "~nshr_database:insert(~p) -> ok.~n",
       [{DB, ObjectID, Permission, Value}]
    ),
 
@@ -48,11 +48,11 @@ insert (DB, ObjectID, Permission, Value) ->
 -spec fetch (atom(), any()) -> ({'ok', any()} | 'not_found').
 fetch (DB, ObjectID) ->
    {atomic, Reply} = do_remote_operation(read, [DB, ObjectID]),
-   io:format("~nsh_database:fetch(~p) -> ~p.~n", [{DB, ObjectID}, Reply]),
+   io:format("~nshr_database:fetch(~p) -> ~p.~n", [{DB, ObjectID}, Reply]),
    Reply.
 
--spec commit (sh_db_query:type()) -> 'ok'.
+-spec commit (shr_db_query:type()) -> 'ok'.
 commit (Query) ->
    {atomic, ok} = do_remote_operation(query, [Query]),
-   io:format("~nsh_database:commit(~p) -> ok.~n", [Query]),
+   io:format("~nshr_database:commit(~p) -> ok.~n", [Query]),
    ok.
diff --git a/src/shared/io/sh_timed_cache.erl b/src/shared/io/shr_timed_cache.erl
index 6f3d973..b89de48 100644
--- a/src/shared/io/sh_timed_cache.erl
+++ b/src/shared/io/shr_timed_cache.erl
@@ -1,4 +1,4 @@
--module(sh_timed_cache).
+-module(shr_timed_cache).
 -behavior(gen_server).
 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
@@ -38,7 +38,7 @@
 -spec add_to_cache (atom(), any(), any()) -> any().
 add_to_cache (DB, Owner, ObjectID) ->
    {ok, TimerPID} = gen_server:start(?MODULE, {DB, {Owner, ObjectID}}, []),
-   {ok, Data} = sh_database:fetch(DB, ObjectID),
+   {ok, Data} = shr_database:fetch(DB, ObjectID),
    ets:insert(DB, {{Owner, ObjectID}, TimerPID, Data}),
    Data.
 
@@ -54,17 +54,17 @@ add_update_to_cache (DB, Owner, ObjectID, Data) ->
 %%%% 'gen_server' functions
 init ({DB, ObjectID}) ->
    io:format("~nCache entry added: ~p.~n", [{DB, ObjectID}]),
-   {ok, {DB, ObjectID}, sh_timed_caches_manager:get_timeout()}.
+   {ok, {DB, ObjectID}, shr_timed_caches_manager:get_timeout()}.
 
 handle_call (invalidate, _, State) ->
    {stop, normal, State};
 handle_call (ping, _, State) ->
-   {noreply, State, sh_timed_caches_manager:get_timeout()}.
+   {noreply, State, shr_timed_caches_manager:get_timeout()}.
 
 handle_cast (invalidate, State) ->
    {stop, normal, State};
 handle_cast (ping, State) ->
-   {noreply, State, sh_timed_caches_manager:get_timeout()}.
+   {noreply, State, shr_timed_caches_manager:get_timeout()}.
 
 terminate (_, {DB, ObjectID}) ->
    io:format
@@ -83,7 +83,7 @@ format_status (_, [_, State]) ->
 handle_info(timeout, State) ->
    {stop, normal, State};
 handle_info(_, {DB, ObjectID}) ->
-   {noreply, {DB, ObjectID}, sh_timed_caches_manager:get_timeout()}.
+   {noreply, {DB, ObjectID}, shr_timed_caches_manager:get_timeout()}.
 
 %%%% Interface Functions
 -spec fetch (atom(), any(), any()) -> any().
diff --git a/src/shared/io/sh_timed_caches_manager.erl b/src/shared/io/shr_timed_caches_manager.erl
index ea92c08..8303cb8 100644
--- a/src/shared/io/sh_timed_caches_manager.erl
+++ b/src/shared/io/shr_timed_caches_manager.erl
@@ -1,4 +1,4 @@
--module(sh_timed_caches_manager).
+-module(shr_timed_caches_manager).
 -behavior(gen_server).
 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%