From 29f982385d2f118c652ff1ca0b6ec53e7e2c4da6 Mon Sep 17 00:00:00 2001
From: Thales Macedo Garitezi <thalesmg@gmail.com>
Date: Wed, 24 Nov 2021 14:58:55 -0300
Subject: [PATCH] chore(appup): remove old file extension and preserve dirname
 for apps

---
 scripts/update_appup.escript | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/scripts/update_appup.escript b/scripts/update_appup.escript
index 738b65ac7..9fc8f618e 100755
--- a/scripts/update_appup.escript
+++ b/scripts/update_appup.escript
@@ -298,12 +298,14 @@ render_appfile(File, Upgrade, Downgrade) ->
     ok = file:write_file(File, IOList).
 
 create_stub(App) ->
-    case locate(src, App, ".app.src") of
+    case locate(src, App, Ext = ".app.src") of
         {ok, AppSrc} ->
-            AppupFile = filename:basename(AppSrc) ++ ".appup.src",
+            DirName = filename:dirname(AppSrc),
+            AppupFile = filename:basename(AppSrc, Ext) ++ ".appup.src",
             Default = {<<".*">>, []},
-            render_appfile(AppupFile, [Default], [Default]),
-            {ok, AppupFile};
+            AppupFileFullpath = filename:join(DirName, AppupFile),
+            render_appfile(AppupFileFullpath, [Default], [Default]),
+            {ok, AppupFileFullpath};
         undefined ->
             false
     end.