... it actually seems to work rather well.reorganizing

Quite a lot of missing db_query:op() though.

1 files changed, 11 insertions, 1 deletions

diff --git a/src/battlemap/bm_handler.erl b/src/battlemap/bm_handler.erl
index 09659e9..d355ea1 100644
--- a/src/battlemap/bm_handler.erl
+++ b/src/battlemap/bm_handler.erl
@@ -18,6 +18,16 @@
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 start (_YawsParams) ->
    {ok, Pid} = sh_timed_caches_manager:start(),
-   bm_database_shim:generate_db(),
+   case sh_database:fetch(battle_db, <<"0">>) of
+      {ok, _} -> ok;
+      not_found ->
+         sh_database:insert
+         (
+            battle_db,
+            <<"0">>,
+            any,
+            bm_shim:generate_random_battle()
+         )
+   end,
    sh_timed_caches_manager:new_cache(Pid, battle_db, none),
    ok.