% Module de création de la base de données euphorik.
-% Auteur : G.Burri
-% Date : 14.10.2007
+% @author G.Burri
-module(euphorik_bd).\r
--export([create/0, create_tables/0, vers_version2/0, vers_version3/0, peupler/0, tester/0]).\r
+-export([\r
+ create/0,\r
+ create_tables/0,\r
+ vers_version/1,\r
+ peupler/0\r
+ ]).\r
\r
-include("../include/euphorik_bd.hrl").\r
]).
-vers_version2() ->
+vers_version(2) ->
mnesia:transform_table(
user,
fun({user, Id, Cookie, Pseudo, Date_creation, Date_derniere_connexion, Css}) ->
end,
record_info(fields, user),
user
- ).
-
-vers_version3() ->
+ );
+vers_version(3) ->
mnesia:transform_table(
user,
fun({user, Id, Cookie, Pseudo, Login, Password, Email, Date_creation, Date_derniere_connexion, Css}) ->
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
).
end
).
-\r
-tester() ->\r
- ok.