anchor.diff:      case rpc:call(TargetNode, release_handler, install_release, [Vsn], ?TIMEOUT) of
           {ok, _, _} ->
               ?INFO(\"Installed Release: ~s~n\", [Vsn]),
  -            permafy(TargetNode, Vsn),
  +            permafy(TargetNode, RelName, Vsn),
               ok;
           {error, {no_such_release, Vsn}} ->
               VerList =
  
positive.code: parse_version(V) when is_list(V) ->
      hd(string:tokens(V,\"/\")).
  
  install_and_permafy(TargetNode, Vsn) ->
      case rpc:call(TargetNode, release_handler, check_install_release, [Vsn], ?TIMEOUT) of
          {ok, _OtherVsn, _Desc} ->
              ok;
  
negative.code:                           [ReleasePackage], ?TIMEOUT) of
                  {ok, Vsn} ->
                      ?INFO(\"Unpacked successfully: ~p~n\", [Vsn]),
                      install_and_permafy(TargetNode, RelName, Vsn);
                  {error, UnpackReason} ->
                      print_existing_versions(TargetNode),
                      ?INFO(\"Unpack failed: ~p~n\",[UnpackReason]),
  