anchor.diff:  	     end,
       get_application_names(Env, ewl_talk:ask_default("app", ""), NewAcc).
   
  -%%--------------------------------------------------------------------
   %% @doc
   %% Build out the project directory structure
  -%% @spec (BuildRef, Env) -> ok
  -%% @end
  -%%--------------------------------------------------------------------
  +%% @end
  +-spec build_out_project(env()) -> ok.
   build_out_project(Env) ->
       ProjDir = get_env(project_dir, Env),
       make_dir(ProjDir),
       build_out_skeleton(Env).
   
  -%%--------------------------------------------------------------------
   %% @doc
   %%  Given the project directory builds out the various directories
   %%  required for an application.
  -%% @spec (BuildRef, Env) -> ok
  -%% @end
  -%%--------------------------------------------------------------------
  +%% @end
  +-spec build_out_skeleton(env()) -> ok.
   build_out_skeleton(Env) ->
       ProjDir = get_env(project_dir, Env),
       make_dir(filename:join(ProjDir, "doc")),
  
positive.code:     CopyHolder = ewl_talk:ask_default("copyright holder", Name),
      Env2 = [{username, Name}, {email_address, Address},
             {copyright_holder, CopyHolder} | Env],
      get_new_project_name(Env2).
  
  
  %%--------------------------------------------------------------------
  %% @doc
  %% Queries the user for the name of this project
  %% @spec (BuildRef, Env) -> Env2
  %% @end
  %%--------------------------------------------------------------------
  get_new_project_name(Env) ->
      {ok, CDir} = file:get_cwd(),
      ewl_talk:say("Please specify name of your project"),
      Name = ewl_talk:ask("project name"),
      Dir = filename:join(CDir, Name),
      ewl_talk:say("Please specify version of your project"),
      Version = ewl_talk:ask("project version"),
      ErtsVersion = ewl_talk:ask_default("Please specify the ERTS version", erlang:system_info(version)),
      Env2 = [{project_version, Version},
              {project_name, Name},
              {project_dir, Dir},
  
negative.code:     end.
  
  
  %% @doc
  %%  Builds the build config dir in the root of the project.
  %% @end
  build_out_build_config(Env) ->
      ProjectDir = get_env(project_dir, Env),
      ProjectName = get_env(project_name, Env),
      ConfName = filename:join([ProjectDir, "sinan.cfg"]),
      ErlwareFile =
  	filename:join([ProjectDir,  "bin", "erlware_release_start_helper"]),
      BinFile = filename:join([ProjectDir,  "bin", ProjectName]),
      ConfigFile = filename:join([ProjectDir,  "config", "sys.config"]),
      sin_skel:build_config(Env, ConfName),
  