X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=index.yaws;h=a0e258baa78f29c2d96f3b99df6b446c329bdf1e;hp=35180ba10bdeda4e26cf340bcbef282300db37b6;hb=24ed7a141aa345454300dd260bbabae3a9f92408;hpb=217c4d7a0d5f9fee3a8ef0a05ab8506c7f39d5e5
diff --git a/index.yaws b/index.yaws
index 35180ba..a0e258b 100755
--- a/index.yaws
+++ b/index.yaws
@@ -1,12 +1,21 @@
-
+
-
+
+ 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
-
- % prédéfinit la feuille de style
+
+ % 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";
@@ -14,7 +23,7 @@
end,
{ehtml, {link ,
[
- {id, "cssPrincipale" },
+ {id, "mainCss" },
{rel, "stylesheet"},
{href, CSS},
{type, "text/css"},
@@ -22,12 +31,12 @@
], []}
}.
-
+
-
-
-
-
+
+
+
+
@@ -35,18 +44,21 @@
+
-
+
+
+
+
+
+
+
-
-
-
-
-
-
+
+
@@ -62,7 +74,8 @@
{ehtml, {'div', [{id, "logo"}] ++ if Est_ek_master -> [{class, "ekMaster"}]; true -> [] end}}.
-
+
+
@@ -89,13 +102,11 @@
)
}.
-
-
+
-
\ No newline at end of file
+
