Check that a release upgrade works and touches the expected applications.

test_relup.erl

Rel=fun(Vsn) ->
    release_handler:unpack_release("eg_"++Vsn),
    A = application:which_applications(),
    {ok,OldVsn,[]} = release_handler:install_release(Vsn),
    B = application:which_applications(),
    Delta = lists:zip(A--B,B--A),
    [{relup,OldVsn,Vsn}
    ,{appups,[{App,From,To}||{{App,_,From},{App,_,To}}<-Delta]}
    ]
end.