X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=index.yaws;h=7de72c840ef204da2e387f1fa46d83217f3b620c;hp=dd82f4ab05ff038e40f1d35f52365c4521f59525;hb=e56ca5b899d3b39c76a9056077729c04c695666b;hpb=11cb1f2af3bfad0d4227eccf57be03fe23eb1bd0
diff --git a/index.yaws b/index.yaws
index dd82f4a..7de72c8 100755
--- a/index.yaws
+++ b/index.yaws
@@ -4,10 +4,20 @@
euphorik.ch
-
- " type="text/css" media="screen" >
+
+ out(A) ->
+ {ehtml, {link ,
+ [
+ {id, "cssPrincipale" },
+ {rel, "stylesheet"},
+ {href,
+ euphorik_bd:css_from_user_cookie(yaws_api:find_cookie_val("cookie", A))
+ },
+ {type, "text/css"},
+ {media, "screen"}
+ ], []}
+ }.
+