anchor.diff:  	false ->
   	    archive_split(File, RevExt, [$/|Acc]);
   	true ->
  -	    ArchiveFile = reverse(Acc),
  +	    ArchiveFile = absname(reverse(Acc)),
   	    {archive, ArchiveFile, File}
       end;
   archive_split([H|T], RevExt, Acc) ->
  
positive.code: 	false ->
  	    no_split;
  	true ->
  	    ArchiveFile = reverse(Acc),
  	    {archive, ArchiveFile, []}
      end.
  
  
negative.code: path_join([Path|Paths],Acc) ->
      path_join(Paths,"/" ++ reverse(Path) ++ Acc).
  
  name_split(undefined, File) ->
      %% Ignore primary archive
      RevExt = reverse(init:archive_extension()),
      case archive_split(File, RevExt, []) of
  