anchor.diff:      %% This is needed if 'start' script created from 'start.src' shall
       %% be used as it points out this directory as log dir for 'run_erl'
       TmpLogDir = filename:join([TmpDir, "log"]),
  -    io:fwrite("Creating temporary directory ~tp ...~n", [TmpLogDir]),
  +    io:fwrite("Creating temporary directory ~ts ...~n", [TmpLogDir]),
       ok = file:make_dir(TmpLogDir),
   
       StartErlDataFile = filename:join([TmpDir, "releases", "start_erl.data"]),
  -    io:fwrite("Creating ~tp ...~n", [StartErlDataFile]),
  +    io:fwrite("Creating ~ts ...~n", [StartErlDataFile]),
       StartErlData = io_lib:fwrite("~s ~s~n", [ErtsVsn, RelVsn]),
       write_file(StartErlDataFile, StartErlData),
       
  -    io:fwrite("Recreating tar file ~tp from contents in directory ~tp ...~n",
  +    io:fwrite("Recreating tar file ~ts from contents in directory ~ts ...~n",
   	      [TarFileName,TmpDir]),
       {ok, Tar} = erl_tar:open(TarFileName, [write, compressed]),
       %% {ok, Cwd} = file:get_cwd(),
  
positive.code:     make_script(RelFileName,SystoolsOpts),
  
      TarFileName = RelFileName ++ ".tar.gz",
      io:fwrite("Creating tar file ~tp ...~n", [TarFileName]),
      make_tar(RelFileName,SystoolsOpts),
  
      TmpDir = filename:join(Dir,"tmp"),
      io:fwrite("Creating directory ~tp ...~n",[TmpDir]),
      file:make_dir(TmpDir), 
  
      io:fwrite("Extracting ~tp into directory ~tp ...~n", [TarFileName,TmpDir]),
      extract_tar(TarFileName, TmpDir),
  
      TmpBinDir = filename:join([TmpDir, "bin"]),
      ErtsBinDir = filename:join([TmpDir, "erts-" ++ ErtsVsn, "bin"]),
      io:fwrite("Deleting \"erl\" and \"start\" in directory ~tp ...~n",
                [ErtsBinDir]),
      file:delete(filename:join([ErtsBinDir, "erl"])),
      file:delete(filename:join([ErtsBinDir, "start"])),
  
      io:fwrite("Creating temporary directory ~tp ...~n", [TmpBinDir]),
      file:make_dir(TmpBinDir),
  
      io:fwrite("Copying file \"~ts.boot\" to ~tp ...~n",
                [PlainRelFileName, filename:join([TmpBinDir, "start.boot"])]),
      copy_file(PlainRelFileName++".boot",filename:join([TmpBinDir, "start.boot"])),
  
      io:fwrite("Copying files \"epmd\", \"run_erl\" and \"to_erl\" from \n"
                "~tp to ~tp ...~n",
                [ErtsBinDir, TmpBinDir]),
      copy_file(filename:join([ErtsBinDir, "epmd"]), 
                filename:join([TmpBinDir, "epmd"]), [preserve]),
  
negative.code:     Dir = filename:dirname(RelFileName),
      PlainRelFileName = filename:join(Dir,"plain"),
      PlainRelFile = PlainRelFileName ++ ".rel",
      io:fwrite("Reading file: ~ts ...~n", [RelFile]),
      {ok, [RelSpec]} = file:consult(RelFile),
      io:fwrite("Creating file: ~ts from ~ts ...~n",
                [PlainRelFile, RelFile]),
      {release,
       {RelName, RelVsn},
  