Replace some french comments by english ones.

[euphorik.git] / tools / tools.erl

diff --git a/tools/tools.erl b/tools/tools.erl
index 28f36cf..764b9af 100755 (executable)
--- a/tools/tools.erl
+++ b/tools/tools.erl
@@ -49,19 +49,6 @@ create_uri(Uri_str) ->
    #uri{host = Host, path = Path}.
 
 build() ->
-   % Create the directory "var/database" if it doesn't exist.
-   {ok, Files_in_root} = file:list_dir("."),
-   Var_exists = lists:any(fun(Name) -> Name =:= "var" end, Files_in_root),
-   if not Var_exists ->
-      file:make_dir("var");
-      true -> ok
-   end,
-   {ok, Files_in_var} = file:list_dir("var"),
-   Database_exists = lists:any(fun(Name) -> Name =:= "database" end, Files_in_var),
-   if not Database_exists ->
-      file:make_dir("var/database");
-      true -> ok
-   end,
    % Build all the Erlang modules.
    cmd("make", [], "modules").