X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=tools%2Ftools.erl;h=764b9af5016c7c1de58b8d6cedf44d452c8cc3fe;hp=28f36cf067f5dfb19428b9118abb04815745d15c;hb=26c6a8cae7e4c5d508d77b2a2f74a77a986ce471;hpb=dc70eed10d6eb26660d02fe8b18eebb2836ef9de

diff --git a/tools/tools.erl b/tools/tools.erl
index 28f36cf..764b9af 100755
--- 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").