X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=modules%2Ferl%2Feuphorik_bd.erl;h=56b7d7fc43fae2a2c45e13fa0ed5fbc140e5af80;hp=bb092fa31be825629033431ad86511e602e7b6c5;hb=e56ca5b899d3b39c76a9056077729c04c695666b;hpb=761de1b3602d40769579f9b0fee7eb70b39d2818

diff --git a/modules/erl/euphorik_bd.erl b/modules/erl/euphorik_bd.erl
index bb092fa..56b7d7f 100755
--- a/modules/erl/euphorik_bd.erl
+++ b/modules/erl/euphorik_bd.erl
@@ -46,6 +46,7 @@
    user_by_login_password/2,
    user_by_mess/1,
    toggle_ek_master/1,
+   css_from_user_cookie/1,
    
    % messages :
    nouveau_message/3,
@@ -366,7 +367,19 @@ toggle_ek_master(User_id) ->
       end
    )).
    
+
+% Renvoie une chaine représentant le cookie ou undefined si pas trouvé.
+css_from_user_cookie(Cookie) ->
+   case user_by_cookie(Cookie) of 
+      {ok, User} ->
+         User#user.css;
+      _ ->
+         undefined
+   end.
    
+
+
+
 user_by_login_password(Login, Password) ->
    resultat_transaction(mnesia:transaction(
       fun() ->