projects
/
euphorik.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
FIX oubli de fichiers
[euphorik.git]
/
modules
/
erl
/
euphorik_bd_update.erl
diff --git
a/modules/erl/euphorik_bd_update.erl
b/modules/erl/euphorik_bd_update.erl
index
4c72284
..
a039c1f
100644
(file)
--- a/
modules/erl/euphorik_bd_update.erl
+++ b/
modules/erl/euphorik_bd_update.erl
@@
-132,11
+132,10
@@
backup(Nom) ->
% Reviens à une version précédente de la base de données
% (les données insérées durant les versions plus récentes sont perdues)
% Reviens à une version précédente de la base de données
% (les données insérées durant les versions plus récentes sont perdues)
-restore(N) when is_integer(N) ->
- mnesia:restore(fichier_backup(N), [{default_op, recreate_tables}]);
-restore(Nom) when is_string(Nom) ->
+restore(N) ->
+ mnesia:restore(fichier_backup(N), [{default_op, recreate_tables}]).
% Renvoie le fichier (avec le chemin) correspondant à la version Version, par exemple : "/var/euphorik/BD/backups/backup1"
fichier_backup(Version) ->
% Renvoie le fichier (avec le chemin) correspondant à la version Version, par exemple : "/var/euphorik/BD/backups/backup1"
fichier_backup(Version) ->
- mnesia:system_info(directory) ++ "/backups/
backup" ++ integer_to_list(Version)
.
+ mnesia:system_info(directory) ++ "/backups/
" ++ if is_integer(Version) -> "backup" ++ integer_to_list(Version); true -> Version end
.