Maxim Sokhatsky 11 лет назад
Родитель
Сommit
74572ecfbd
1 измененных файлов с 4 добавлено и 3 удалено
  1. 4 3
      src/avz.erl

+ 4 - 3
src/avz.erl

@@ -24,6 +24,7 @@ api_event(Name, Args, Term)      -> error_logger:info_msg("Unknown API event: ~p
 
 
 login_user(User) -> wf:user(User), wf:redirect(?AFTER_LOGIN).
 login_user(User) -> wf:user(User), wf:redirect(?AFTER_LOGIN).
 login(Key, Args)-> case Args of [{error, E}|_Rest] -> error_logger:info_msg("oauth error: ~p", [E]);
 login(Key, Args)-> case Args of [{error, E}|_Rest] -> error_logger:info_msg("oauth error: ~p", [E]);
-    _ -> case kvs:get(user,Key:email_prop(Args,Key)) of
-              {ok,Existed} -> RegData = Key:registration_data(Args, Key, Existed), (wf_context:page_module()):event({login, RegData});
-              {error,_} -> RegData = Key:registration_data(Args, Key, #user{}), (wf_context:page_module()):event({register, RegData}) end end.
+    _ -> wf:info("AVZ MODULE: ~p",[?CTX#context.module]),
+            case kvs:get(user,Key:email_prop(Args,Key)) of
+              {ok,Existed} -> RegData = Key:registration_data(Args, Key, Existed), (?CTX#context.module):event({login, RegData});
+              {error,_} -> RegData = Key:registration_data(Args, Key, #user{}), (?CTX#context.module):event({register, RegData}) end end.