MOD amélioration de la complexité de la fonction euphorik_bd:nouveau_message/3 mais...
[euphorik.git] / modules / erl / euphorik_bd_admin.erl
index 20da1fa..62ab563 100644 (file)
@@ -58,7 +58,7 @@ version_bd() ->
    
 
 % Instructions pour créer une nouvelle base : 
-% $erl -sname yaws -mnesia dir '"/projets/euphorik/BD"'
+% $erl -sname yaws -mnesia dir '"/projets/euphorik/var/BD"'
 % voir doc/installation.txt
 % >l(euphorik_bd).
 % >euphorik_bd:create().
@@ -141,7 +141,8 @@ reset() ->
       User = #user{id = 0, profile = #profile{pseudo = "Sys"}, login = "Sys", date_creation = now(), date_derniere_connexion = now(), ek_master = true},
       mnesia:write(User),
       User
-   end).
+   end),
+   peupler_texte().
    
    
 peupler_texte() ->
@@ -153,9 +154,9 @@ peupler_texte() ->
       mnesia:write(#texte{ id = 50, fr = "Impossible de mettre à jour le profile"}),
       mnesia:write(#texte{ id = 60, fr = "timeout"}),
       mnesia:write(#texte{ id = 70, fr = "Page inconnue"}),
-      mnesia:write(#texte{ id = 80, fr = "Vous êtes banni pour encore ~w"}),
+      mnesia:write(#texte{ id = 80, fr = "Vous êtes banni pour encore ~s"}),
       mnesia:write(#texte{ id = 90, fr = "Message vide"}),
-      mnesia:write(#texte{ id = 100, fr = "Impossible d'ajouter un nouveau message. Raison : ~w"}),
+      mnesia:write(#texte{ id = 100, fr = "Impossible d'ajouter un nouveau message. Raison : ~s"}),
       mnesia:write(#texte{ id = 110, fr = "Utilisateur inconnu"}),
       mnesia:write(#texte{ id = 120, fr = "Il n'est pas possible de s'auto bannir"}),
       mnesia:write(#texte{ id = 130, fr = "L'utilisateur est lui même un ekMaster"}),
@@ -202,7 +203,7 @@ update(Version) ->
    
 % Applique une modification de la BD pour passer d'une version à la suivante.
 % crée un backup avant l'application du patch
-% dans BD/backups nommé "backup<num>" où <num> et le numéro de la version.
+% dans var/BD/backups nommé "backup<num>" où <num> et le numéro de la version.
 % 1 -> 2
 patch(1) ->
    mnesia:create_table(texte, [
@@ -269,7 +270,7 @@ patch_1_traiter_message(M, Racine) ->
 %   mnesia:restore(fichier_backup(N), [{default_op, recreate_tables}]).
 
 
-% Renvoie le fichier (avec le chemin) correspondant à la version Version, par exemple : "/var/euphorik/BD/backups/backup1"
+% Renvoie le fichier (avec le chemin) correspondant à la version Version, par exemple : "/var/euphorik/var/BD/backups/backup1"
 fichier_backup(Version) -> 
    mnesia:system_info(directory) ++ "/backups/" ++ if is_integer(Version) -> "backup" ++ integer_to_list(Version); true -> Version end.