File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -77,7 +77,7 @@ Function Notarize($zipfilepath : Text)->$error : Object
7777
7878 // if $sourcepath is ommitted, it reads path from settings, only for components on Mac
7979Function Zip ($sourcepath : Text; $targetpath : Text)- > $error : Object
80- var $settings ; $Found ; $settingsXML ; $value ; $source ; $target ; $cmd ; $in ; $in ; $ err ; $out : Text
80+ var $settings ; $Found ; $settingsXML ; $value ; $source ; $target ; $cmd ; $in ; $err ; $out : Text
8181 var $sourcefolder : 4D:C1709 .Folder
8282 var $sourcefolderfiles : Collection
8383
Original file line number Diff line number Diff line change 22var $source ; $target ; $answer ; $progressid : Text
33var $result ; $checkstop : Object
44
5+ var $ftp : cs:C1710 .FileTransfer_curl
6+
57If (False:C215)
6- var $ftp : cs :C1710 . FileTransfer_curl
8+ $ftp := Null :C1517
79 $ftp := cs:C1710 .FileTransfer_curl .new ("www.4d.com" ; "" ; "" ; "https" )
810 $ftp .setConnectTimeout (5 )
911
@@ -19,7 +21,7 @@ If (False:C215)
1921End if
2022
2123If (False:C215) // download with progress but without stop button
22- var $ftp : cs :C1710 . FileTransfer_curl
24+ $ftp := Null :C1517
2325 $ftp := cs:C1710 .FileTransfer_curl .new ("download.4d.com" ; "" ; "" ; "https" )
2426
2527 $ftp .useCallback (Formula:C1597 (ProgressCallback); "Download 4D.dmg" )
@@ -34,7 +36,7 @@ If (False:C215) // download with progress but without stop button
3436End if
3537
3638If (False:C215) // download with invalid source name
37- var $ftp : cs :C1710 . FileTransfer_curl
39+ $ftp := Null :C1517
3840 $ftp := cs:C1710 .FileTransfer_curl .new ("download.4d.com" ; "" ; "" ; "https" )
3941
4042 $ftp .useCallback (Formula:C1597 (ProgressCallback); "Download 4D.dmg" )
@@ -49,7 +51,7 @@ If (False:C215) // download with invalid source name
4951End if
5052
5153If (True:C214) // download with progress, stop button
52- var $ftp : cs :C1710 . FileTransfer_curl
54+ $ftp := Null :C1517
5355 $ftp := cs:C1710 .FileTransfer_curl .new ("download.4d.com" ; "" ; "" ; "https" )
5456
5557 $progressid := "Download 4D.dmg"
You can’t perform that action at this time.
0 commit comments