Make source archive: Display the right error message when an unsupported archive format extension is selected.
[DEVELOPMENT ENVIRONMENT] * BUG: Make source archive: Display the right error message when an unsupported archive format extension is selected.
This commit is contained in:
parent
e76bf8455d
commit
b529ca0ff9
1 changed files with 4 additions and 0 deletions
|
@ -4791,6 +4791,10 @@ Public Sub MakeSourcePackageFromTo(sFrom As String, sPath As String, Optional bF
|
|||
sCmd &= " --exclude=" & Shell$(sIgnore)
|
||||
Next
|
||||
sCmd &= " " & Shell$(File.Name(sFrom))
|
||||
|
||||
Case Else
|
||||
|
||||
Goto UNSUPPORTED
|
||||
|
||||
End Select
|
||||
|
||||
|
|
Loading…
Reference in a new issue