FIX la css généré dans yaws lorsque la personne n'est pas connecté

[euphorik.git] / index.yaws

diff --git a/index.yaws b/index.yaws
index 7de72c8..1b88721 100755 (executable)
--- a/index.yaws
+++ b/index.yaws
@@ -6,13 +6,15 @@
    <title>euphorik.ch</title>
    <erl>
       out(A) -> 
+         CSS = case euphorik_bd:css_from_user_cookie(yaws_api:find_cookie_val("cookie", A)) of
+            undefined -> "css/1/euphorik.css";
+            C -> C
+         end,
          {ehtml, {link ,
             [
                {id, "cssPrincipale" },
                {rel, "stylesheet"},
-               {href, 
-                  euphorik_bd:css_from_user_cookie(yaws_api:find_cookie_val("cookie", A))
-               },
+               {href, CSS},
                {type, "text/css"},
                {media, "screen"}
             ], []}