X-Git-Url: http://git.euphorik.ch/index.cgi?a=blobdiff_plain;f=index.yaws;h=87f40e21598ade59264502355800ae152b2288b3;hb=09608ab29e1c39ea51b51a5f8669dcde36efb306;hp=dd82f4ab05ff038e40f1d35f52365c4521f59525;hpb=11cb1f2af3bfad0d4227eccf57be03fe23eb1bd0;p=euphorik.git
diff --git a/index.yaws b/index.yaws
index dd82f4a..87f40e2 100755
--- a/index.yaws
+++ b/index.yaws
@@ -1,42 +1,114 @@
-
-
+
-
+
+ out(A) ->
+ {header, {content_type,
+ case string:str((A#arg.headers)#headers.user_agent, "MSIE") of
+ 0 -> "text/html"; %"application/xhtml+xml"; % TODO : jquery.lightbox does not support application/xhtml+xml
+ _ -> "text/html"
+ end
+ }}.
+
+
+
euphorik.ch
-
- " type="text/css" media="screen" >
-
-
-
-
-
-
-
-
-
-
-
+
+ % set the stylesheet
+ out(A) ->
+ CSS = case euphorik_bd:css_from_user_cookie(yaws_api:find_cookie_val("cookie", A)) of
+ undefined -> "styles/1/euphorik.css";
+ C -> C
+ end,
+ {ehtml, {link ,
+ [
+ {id, "mainCss" },
+ {rel, "stylesheet"},
+ {href, CSS},
+ {type, "text/css"},
+ {media, "screen"}
+ ], []}
+ }.
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
-
+
+ % 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}}.
+
+
+
-
-
+
-
\ No newline at end of file
+