X-Git-Url: http://git.euphorik.ch/index.cgi?a=blobdiff_plain;ds=sidebyside;f=index.yaws;h=c5cbf63cbae0d88fadeda0a5df1648948608461d;hb=7892ce3f365cbb8b6cc7d7c3799e296fc5fff1a5;hp=f345df069589a2c59b05e6ef7c1741e0ec3f8617;hpb=2c27419e5ff0d1d064cf4d7e1417c469c82aef34;p=euphorik.git
diff --git a/index.yaws b/index.yaws
index f345df0..c5cbf63 100755
--- a/index.yaws
+++ b/index.yaws
@@ -1,14 +1,15 @@
-
-
+
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";
+ undefined -> "styles/1/euphorik.css";
C -> C
end,
{ehtml, {link ,
@@ -22,29 +23,70 @@
}.
-
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
-
+
+ % 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}}.
+
+
-