MOD mise à jour mineur sur la présentation du code

[euphorik.git] / modules / erl / euphorik_bd.erl

diff --git a/modules/erl/euphorik_bd.erl b/modules/erl/euphorik_bd.erl
index 56a659a..49bb334 100755 (executable)
--- a/modules/erl/euphorik_bd.erl
+++ b/modules/erl/euphorik_bd.erl
@@ -1,9 +1,13 @@
 % 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
 
@@ -43,7 +47,7 @@ create_tables() ->
    ]).
 
 
-vers_version2() ->
+vers_version(2) ->
    mnesia:transform_table(
       user,
       fun({user, Id, Cookie, Pseudo, Date_creation, Date_derniere_connexion, Css}) ->
@@ -52,8 +56,9 @@ vers_version2() ->
       record_info(fields, user),
       user
    ).
+\r
 
-vers_version3() ->
+vers_version(3) ->
    mnesia:transform_table(
       user,
       fun({user, Id, Cookie, Pseudo, Login, Password, Email, Date_creation, Date_derniere_connexion, Css}) ->
@@ -73,7 +78,4 @@ peupler() ->
       end
    ).
 
-\r
-tester() ->\r
-   ok.