anchor.diff:                                  "' DiskId='1' Source='"++FilePath++"'"
                   " KeyPath='yes' />\n"++lists:duplicate(N+3,32)++
                   "</Component>\n"),
  -            io:format("\t~s~n", [F])
  +            if Verbose -> io:format("\t~s~n", [F]); true -> ok end
       end,
  -    walk_release(FileH, Files, Dir, N).
  -
  -build_features(FileH) ->
  +    walk_release(Verbose, FileH, Files, Dir, N).
  +
  +build_features(_Verbose, FileH) ->
       ok = file:write(FileH,
           "   <Feature Id='Complete' Title='"?PRODUCT" "?VERSION"'"
                       " Description='The complete package.'"
  
positive.code:     io:format("~s", [os:cmd("rebar generate")]),
      ok = file:set_cwd(CurDir).
  
  create_wxs(Root) ->
      {ok, FileH} = file:open(filename:join([Root, "rel"
                                             , "wixsetup", ?WXSFILE])
                              , [write, raw]),
      {ok, PRODUCT_GUID} = get_id(undefined, 'PRODUCT_GUID', undefined),
      {ok, UPGRADE_GUID} = get_id(undefined, 'UPGRADE_GUID', undefined),
      {ok, ID} = get_id(undefined, ?COMPANY, undefined),
      ok = file:write(FileH,
          "<?xml version='1.0' encoding='windows-1252'?>\n"
          "<Wix xmlns='http://schemas.microsoft.com/wix/2006/wi'>\n\n"
  
negative.code:                 dir -> {ok, Item#item.id}
              end
      end;
  get_id(_Verbose, undefined, Field, undefined) when is_list(Field) ->
      Id = "id_"++?H(Field),
      case dets:lookup(?TAB, Id) of
          [] ->
  