anchor.diff:      New1 = mnesia_lib:intersect(Ns, Connected),
       New = New1 -- Current,    
       process_flag(trap_exit, true),
  -    Res = try_merge_schema(New, UserFun),
  +    Res = try_merge_schema(New, [], UserFun),
       Msg = {schema_is_merged, [], late_merge, []},
       multicall([node()|Ns], Msg),
       After = val({current, db_nodes}),    
  
positive.code: default_merge(F) ->
      F([]).
  
  try_merge_schema(Nodes, UserFun) ->
      case mnesia_schema:merge_schema(UserFun) of
  	{atomic, not_merged} ->
  	    %% No more nodes that we need to merge the schema with
  	    ok;
  	{atomic, {merged, OldFriends, NewFriends}} ->
  	    %% Check if new nodes has been added to the schema
  	    Diff = mnesia_lib:all_nodes() -- [node() | Nodes],
  
negative.code: %%
  %% %CopyrightBegin%
  %%
  %% Copyright Ericsson AB 1996-2011. All Rights Reserved.
  %%
  %% The contents of this file are subject to the Erlang Public License,
  %% Version 1.1, (the "License"); you may not use this file except in
  