|
To see the problem dd this test to the ZipArchive tests:
testisZipArchive | nonArchive | zip addFile: fileToZip fullName as: fileToZip basename. zip writeToFileNamed: zipFile fullName. self assert: (ZipArchive isZipArchive: zipFile). nonArchive := 'non_archive_file_for_test.txt' asFileReference. nonArchive ensureCreateFile. [ self deny: (ZipArchive isZipArchive: nonArchive) ] ensure: [ nonArchive ensureDelete ]
|
|
|
Priority: 2 – Really Important
|
|
Status: Work Needed
|
|
Assigned to: Everyone
|
|
Milestone: Pharo7.0
|
Go to Case
|
|