anchor.diff:      ok = file:close(Fd),
       {RelName,Apps,ErtsVsn}.
   
  +restart_type(App) when App==kernel; App==stdlib; App==sasl ->
  +    permanent;
  +restart_type(_) ->
  +    temporary.
  +
   copy_file(Src, Dest) ->
       copy_file(Src, Dest, []).
   
  
positive.code: 						 true ->
  						     [];
  						 false ->
  						     [{App,Vsn}]
  					     end;
  					 _ ->
  					     []
  
negative.code:             Error
      end.
  
  wait_node_up(ExpStatus,ExpVsn,ExpApps0) ->
      ExpApps = [{A,V} || {A,V,_T} <- ExpApps0],
      Node = node_name(?upgr_sname),
      wait_node_up(Node,ExpStatus,ExpVsn,lists:keysort(1,ExpApps),60).
  
  