X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=index.yaws;fp=index.yaws;h=9b80ee1767f5c716b680e5240ba42cdbac88a586;hp=a32b3017f29af2d9e11d1f3c8b53c9c027a1c0c6;hb=808fb60f6c10dfcaccee94c6a49f768de84dc2ef;hpb=5d9992368bb386d2e606ae037c5478fe10ac70e8;ds=sidebyside
diff --git a/index.yaws b/index.yaws
index a32b301..9b80ee1 100755
--- a/index.yaws
+++ b/index.yaws
@@ -67,10 +67,10 @@
- % permet de prédéfinir la "class" du logo pour un ekMaster...
+ % To redefine the logo class for the ekMasters.
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}}.
+ Is_ek_master = euphorik_bd:is_ek_master_from_cookie(yaws_api:find_cookie_val("cookie", A)),
+ {ehtml, {'div', [{id, "logo"}] ++ if Is_ek_master -> [{class, "ekMaster"}]; true -> [] end}}.
@@ -83,12 +83,12 @@
% parse les styles disponible
out(A) ->
- Stlyes_dir = A#arg.docroot ++ "/styles",
- {ok, Liste_dir} = file:list_dir(Stlyes_dir),
+ Styles_dir = A#arg.docroot ++ "/styles",
+ {ok, Liste_dir} = file:list_dir(Styles_dir),
{ehtml,
lists:foldr(
fun(Dir, Acc) ->
- case file:consult(Stlyes_dir ++ "/" ++ Dir ++ "/infos.txt") of
+ case file:consult(Styles_dir ++ "/" ++ Dir ++ "/infos.txt") of
{ok, [{nom, Nom}]} ->
[{option, [{value, Dir}], Nom} | Acc];
_ ->