X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=index.yaws;h=d3ff0f8720d5273e76ba37e9e852e0e093833b12;hp=f345df069589a2c59b05e6ef7c1741e0ec3f8617;hb=18e8fadf5aad8d7b2e7b750210dc949951b4a124;hpb=2c27419e5ff0d1d064cf4d7e1417c469c82aef34 diff --git a/index.yaws b/index.yaws index f345df0..d3ff0f8 100755 --- a/index.yaws +++ b/index.yaws @@ -1,11 +1,12 @@ - - + euphorik.ch + % prédéfinit la feuille de style out(A) -> CSS = case euphorik_bd:css_from_user_cookie(yaws_api:find_cookie_val("cookie", A)) of undefined -> "css/1/euphorik.css"; @@ -35,10 +36,16 @@
- + + % permet de prédéfinir la "class" du logo pour un ekMaster.. + out(A) -> + Est_ek_master = euphorik_bd:is_ek_master_from_cookie(yaws_api:find_cookie_val("cookie", A)), + {ehtml, {'div', [{id, "logo"}] ++ if Est_ek_master -> [{class, "ekMaster"}]; true -> [] end}}. + +