X-Git-Url: http://git.euphorik.ch/?a=blobdiff_plain;f=modules%2Ferl%2Feuphorik_bd.erl;h=c8367761101c368360edaba78f169fd4249b961c;hb=6fab12088e85e62ef34a312c3f3a33f9636bbc97;hp=c27a6940f46c02ba05a89d739722d8e1b934cc42;hpb=bacec85920574375f4b8df20d6a0457e1fffc658;p=euphorik.git

diff --git a/modules/erl/euphorik_bd.erl b/modules/erl/euphorik_bd.erl
index c27a694..c836776 100755
--- a/modules/erl/euphorik_bd.erl
+++ b/modules/erl/euphorik_bd.erl
@@ -14,6 +14,7 @@
 
 % Instructions pour créer une nouvelle base : 
 % $erl -sname yaws -mnesia dir '"/projets/euphorik/BD"'
+% voir doc/installation.txt
 % >l(euphorik_bd).
 % >euphorik_bd:create().
 create() ->
@@ -83,7 +84,17 @@ vers_version(5) ->
       end,
       record_info(fields, user),
       user
-   ).      
+   );
+% Ajout le format d'affichage des pseudos
+vers_version(6) ->
+   mnesia:transform_table(
+      user,
+      fun({user, Id, Cookie, Pseudo, Login, Password, Email, Date_creation, Date_derniere_connexion, Css, Indice_flood, Page_Principale, Conversations}) ->
+            {user,  Id, Cookie, Pseudo, Login, Password, Email, Date_creation, Date_derniere_connexion, Css, nick, Indice_flood, Page_Principale, Conversations}
+      end,
+      record_info(fields, user),
+      user
+   ).   
 
 
 % exemple de peuplage de la BD, utilisé pour les tests
@@ -94,5 +105,3 @@ peupler() ->
          mnesia:write({minichat, now(), "Paul", "Salut à toi !"})
       end
    ).
-
-