X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=tools%2Fupdate_server.erl;fp=tools%2Fupdate_server.erl;h=72686b1f4686581fc1be4e94580cac6f0192e044;hp=42117728c26dc0af2bd34a8628eb8b4c5bb2ef1a;hb=808fb60f6c10dfcaccee94c6a49f768de84dc2ef;hpb=5d9992368bb386d2e606ae037c5478fe10ac70e8 diff --git a/tools/update_server.erl b/tools/update_server.erl index 4211772..72686b1 100755 --- a/tools/update_server.erl +++ b/tools/update_server.erl @@ -11,7 +11,7 @@ hote() -> % le premier argument est le nom du noeud est peut valoir : % - yaws : noeud de production % - yaws_dev : noeud de pre-production -main([Nom_node]) when Nom_node =:= "yaws"; Nom_node =:= "yaws_dev" -> +main([Nom_node]) when Nom_node =:= "yaws"; Nom_node =:= "yaws_dev" -> Node = list_to_atom(Nom_node ++ atom_to_list(hote())), net_kernel:start([flynux, shortnames]), io:format("rechargement des modules..~n"), @@ -35,4 +35,3 @@ copier_bd(Node) -> rpc:call(Node, mnesia, restore, [Fichier2, [{default_op, recreate_tables}]]), rpc:call(yaws@overnux, file, delete, [Fichier]), rpc:call(Node, file, delete, [Fichier2]). - \ No newline at end of file