Cleaning...
[euphorik.git] / index.yaws
index 7899936..99ce454 100755 (executable)
    <body>\r
       <div id="container">\r
          <erl>\r
-            % permet de prédéfinir la "class" du logo pour un ekMaster...\r
+            % To redefine the logo class for the ekMasters.\r
             out(A) ->\r
-               Est_ek_master = euphorik_bd:is_ek_master_from_cookie(yaws_api:find_cookie_val("cookie", A)),\r
-               {ehtml, {'div', [{id, "logo"}] ++ if Est_ek_master -> [{class, "ekMaster"}]; true -> [] end}}.\r
-\r
+               Is_ek_master = euphorik_bd:is_ek_master_from_cookie(yaws_api:find_cookie_val("cookie", A)),\r
+               {ehtml, {'div', [{id, "logo"}] ++ if Is_ek_master -> [{class, "ekMaster"}]; true -> [] end}}.\r
          </erl>\r
          <div id="info" style="display:none" ><div id="icone"></div><div class="close" ></div><div class="message" ></div><div class="buttons"></div></div>\r
          <div id="waitbar" style="display:none" ><div class="image"></div></div>\r
                   <erl>\r
                      % parse les styles disponible\r
                      out(A) ->\r
-                        Stlyes_dir = A#arg.docroot ++ "/styles",\r
-                        {ok, Liste_dir} = file:list_dir(Stlyes_dir),\r
+                        Styles_dir = A#arg.docroot ++ "/styles",\r
+                        {ok, Liste_dir} = file:list_dir(Styles_dir),\r
                         {ehtml,\r
                            lists:foldr(\r
                               fun(Dir, Acc) ->\r
-                                 case file:consult(Stlyes_dir ++ "/" ++ Dir ++ "/infos.txt") of\r
+                                 case file:consult(Styles_dir ++ "/" ++ Dir ++ "/infos.txt") of\r
                                     {ok, [{nom, Nom}]} ->\r
                                        [{option, [{value, Dir}], Nom} | Acc];\r
                                     _ ->\r