Fix if building for real device, there is no app (only ipa and xarchive)

Do not even try to get default app path for simu if exporting archive
4d · Sep 16, 2024 · 303c9cc · 303c9cc
1 parent 6c0e0c1
commit 303c9cc
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 5 deletions.
diff --git a/Project/Sources/Classes/MobileProjectIOS.4dm b/Project/Sources/Classes/MobileProjectIOS.4dm
@@ -173,12 +173,15 @@ Function build()->$result : Object
 	If ($result.app=Null:C1517)
 
 		var $pathname : 4D:C1709.Folder
-		$pathname:=Folder:C1567(This:C1470.input.path; fk platform path:K87:2).folder("build/Build/Products/Debug-iphonesimulator/"+This:C1470._schemeName+".app")
-
-		If ($pathname.exists)
+		If ($result.exportPath=Null:C1517)
 
-			$result.app:=$pathname.path
+			$pathname:=Folder:C1567(This:C1470.input.path; fk platform path:K87:2).folder("build/Build/Products/Debug-iphonesimulator/"+This:C1470._schemeName+".app")
 
+			If ($pathname.exists)
+
+				$result.app:=$pathname.path
+
+			End if 
 		End if 
 	End if 
 

diff --git a/Project/Sources/Methods/Xcode.4dm b/Project/Sources/Methods/Xcode.4dm
@@ -1150,7 +1150,7 @@ Case of
 					End if 
 
 					// remove some trailing data like -infoplist-subpath Info.plist
-					If (Position:C15(".app "; $Obj_result.app)>0)  // XXX: last pos
+					If (Position:C15(".app "; String:C10($Obj_result.app))>0)  // XXX: last pos
 
 						$Obj_result.app:=Substring:C12($Obj_result.app; 1; Position:C15(".app "; $Obj_result.app)+3)