X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=modules%2Ferl%2Feuphorik_bd.erl;h=469e2422629cd6654e76d02357d56f613dc5d23d;hp=4478726a9f302d49939dabdcf91398e4810d8434;hb=ac8cb03ce2a0982fd386e639be1368c8fb59e94e;hpb=50e129994805932dbf407e55afb971c0f7b20f1c

diff --git a/modules/erl/euphorik_bd.erl b/modules/erl/euphorik_bd.erl
index 4478726..469e242 100755
--- a/modules/erl/euphorik_bd.erl
+++ b/modules/erl/euphorik_bd.erl
@@ -64,6 +64,15 @@ vers_version(3) ->
       end,
       record_info(fields, user),
       user
+   );
+vers_version(4) ->
+   mnesia:transform_table(
+      user,
+      fun({user, Id, Cookie, Pseudo, Login, Password, Email, Date_creation, Date_derniere_connexion, Css, Indice_flood}) ->
+            {user,  Id, Cookie, Pseudo, Login, Password, Email, Date_creation, Date_derniere_connexion, Css, Indice_flood, []}
+      end,
+      record_info(fields, user),
+      user
    ).