kvs put

apps/face/src/index.erl

@@ -261,7 +261,7 @@ event(reveal) ->
 
 event(login_button) -> wf:wire(logout());
 event({register,User}) -> wf:info("Register: ~p",[User]), kvs:add(User), wf:user(User);
-event({login,User}) -> wf:info("Login: ~p",[User]), wf:user(User);
+event({login,User}) -> wf:info("Login: ~p",[User]), kvs:put(User), wf:user(User);
 
 event(pause) ->
     Action  =

apps/server/src/gas.erl

@@ -2,7 +2,7 @@
 -compile(export_all).
 
 %-define(ALLOWED, [gas,nsg_trn_lucky,game_session,game_manager,game_okey_ng_table_trn]).
--define(ALLOWED, [gas,game_session]).
+-define(ALLOWED, [gas]).
 
 log(Module, String, Args, Fun) ->
     case lists:member(Module,?ALLOWED) of