X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=modules%2Ferl%2Feuphorik_bd_admin.erl;h=12c2d4d7a0ce9840048e91d62b18062007087e1d;hp=38fabfe0a3f9d835e4bed3f6e3279bd1c9c6c6d7;hb=e0c2c2fa82cf13cd55b8d5006ad2c7e0689dc6cb;hpb=c4d03b8678ab3ce2442d81730ba96dd26768274a

diff --git a/modules/erl/euphorik_bd_admin.erl b/modules/erl/euphorik_bd_admin.erl
index 38fabfe..12c2d4d 100644
--- a/modules/erl/euphorik_bd_admin.erl
+++ b/modules/erl/euphorik_bd_admin.erl
@@ -79,18 +79,15 @@ create_tables() ->
    ]),
    mnesia:create_table(minichat, [
       {attributes, record_info(fields, minichat)},
-      {index, [auteur_id, troll_id]},
       {disc_copies, [node()]}
    ]),
    mnesia:create_table(reponse_minichat, [
       {type, bag},
       {attributes, record_info(fields, reponse_minichat)},
-      {index, [cible]},
       {disc_copies, [node()]}
    ]),
    mnesia:create_table(user, [
       {attributes, record_info(fields, user)},
-      {index, [cookie, login]},
       {disc_copies, [node()]}
    ]),
    mnesia:create_table(ip_table, [
@@ -99,9 +96,19 @@ create_tables() ->
    ]),
    mnesia:create_table(troll, [
       {attributes, record_info(fields, troll)},
-      {index, [date_post]},
       {disc_copies, [node()]}
-   ]).
+   ]),
+   creer_indexes().
+   
+   
+% mis à part car lors de la reprise de données avec load_textfile les indexes ne sont pas recréés
+creer_indexes() ->
+   mnesia:add_table_index(minichat, auteur_id),
+   mnesia:add_table_index(minichat, troll_id),
+   mnesia:add_table_index(reponse_minichat, cible),
+   mnesia:add_table_index(user, cookie),
+   mnesia:add_table_index(user, login),
+   mnesia:add_table_index(troll, date_post).
    
    
 % Connexion à la base de données de yaws sur overnux
@@ -191,14 +198,12 @@ patch(1) ->
       {aborted, Raison} -> {erreur, Raison};
       {atomic, _} -> ok
    end.
-% 2 -> 3
-%patch(2) ->
-
+   
 
 % Prend un chemin vers la feuille de style de type "css/1/euphorik.css"
 % et renvoie "styles/1/euphorik.css"
-patch1_transforme_css(["css" | Reste]) ->
-   ["styles" | Reste];
+patch1_transforme_css("css" ++ Reste) ->
+   "styles" ++ Reste;
 patch1_transforme_css(F) ->
    F.