anchor.diff:  %% @end
   %% @private
   %%--------------------------------------------------------------------
  -build_apps(BuildRef, BuildSupInfo, ['NONE' | T], Args) ->
  -    %% We ignore an app type of none, its a remnent of the
  -    %% reorder process.
  -    build_apps(BuildRef, BuildSupInfo, T, Args);
  -build_apps(BuildRef, BuildSupInfo, [App | T], Args) ->
  -    build_app(BuildRef, BuildSupInfo, App, Args),
  -    build_apps(BuildRef, BuildSupInfo, T, Args);
  -build_apps(_, _BuildSupInfo, [], _Args) ->
  -    ok.
  +build_apps(BuildRef, BuildSupInfo, AppList, Args) ->
  +    lists:foreach(fun ('NONE') ->
  +			  %% We ignore an app type of none, its a remnent
  +			  %% of the reorder process.
  +			  ok;
  +		      (App) ->
  +			  build_app(BuildRef, BuildSupInfo, App, Args)
  +		  end, AppList).
   
   %%-------------------------------------------------------------------
   %% @doc
  
positive.code: 
  %%--------------------------------------------------------------------
  %% @doc
  %%  Reorder the list into dependent modules
  %% @spec (BuildRef, Lst, FileList, Acc) -> NewModuleList
  %% @end
  %%--------------------------------------------------------------------
  reorder_list(BuildRef, Lst, FileList, Acc) ->
      reorder_list(BuildRef, Lst, FileList, Acc, ok).
  
  %%--------------------------------------------------------------------
  %% @doc
  %%  Reorder the list according to whats in the *.app. This will
  %% allow intra application compile time dependencies.
  %% @spec (BuildRef, ModList, FileList, Acc, OkFlag) -> NewList
  %% @end
  %% @private
  %%--------------------------------------------------------------------
  reorder_list(BuildRef, [H | T], FileList, Acc, OkFlag) ->
      case get_file_list(H, FileList) of
          not_in_list ->
              eta_event:task_fault(BuildRef, ?TASK,
                                   {"The module specified by ~w is not "
                                    "on the filesystem!! Not building.", [H]}),
              reorder_list(BuildRef, T, FileList, Acc, not_ok);
          Entry ->
              reorder_list(BuildRef, T, FileList, [Entry | Acc], OkFlag)
      end;
  reorder_list(_, [], _FileList, Acc, ok) ->
      lists:reverse(Acc);
  reorder_list(_, [], _FileList, _, not_ok) ->
      ?ETA_RAISE(build_errors).
  
  %%--------------------------------------------------------------------
  %% @doc
  %%  Get the entry specified by name from the list in module list.
  
negative.code:     atom_to_list(Atom);
  to_list(Atom) when is_list(Atom) ->
      Atom.
  
  %%--------------------------------------------------------------------
  %% @doc
  