From 0d5a803a28010cc956948b614408b9d38997e9a1 Mon Sep 17 00:00:00 2001
From: Eric B Merritt <ericbmerritt@gmail.com>
Date: Fri, 3 May 2013 09:17:35 -0700
Subject: support the creation or relups

---
 src/rcl_rel_discovery.erl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'src/rcl_rel_discovery.erl')

diff --git a/src/rcl_rel_discovery.erl b/src/rcl_rel_discovery.erl
index d9012ea..6cd84f0 100644
--- a/src/rcl_rel_discovery.erl
+++ b/src/rcl_rel_discovery.erl
@@ -118,15 +118,15 @@ resolve_release(RelFile, AppMeta) ->
         {ok, [{release, {RelName, RelVsn},
                {erts, ErtsVsn},
                Apps}]} ->
-            build_release(RelName, RelVsn, ErtsVsn, Apps, AppMeta);
+            build_release(RelFile, RelName, RelVsn, ErtsVsn, Apps, AppMeta);
         {ok, InvalidRelease} ->
             ?RCL_ERROR({invalid_release_information, InvalidRelease});
         {error, Reason} ->
             ?RCL_ERROR({unable_to_read, RelFile, Reason})
     end.
 
-build_release(RelName, RelVsn, ErtsVsn, Apps, AppMeta) ->
-    Release = rcl_release:erts(rcl_release:new(RelName, RelVsn),
+build_release(RelFile, RelName, RelVsn, ErtsVsn, Apps, AppMeta) ->
+    Release = rcl_release:erts(rcl_release:new(RelName, RelVsn, RelFile),
                                ErtsVsn),
     resolve_apps(Apps, AppMeta, Release, []).
 
-- 
cgit v1.2.3