--- a/ResourcePack.st Tue Apr 23 16:30:55 2019 +0200
+++ b/ResourcePack.st Mon May 06 13:58:10 2019 +0200
@@ -1733,12 +1733,19 @@
].
triedFilename := inStream pathName.
- [
- ok := self readFromResourceStream:inStream in:(triedFilename asFilename directoryName).
- ] ensure:[
- inStream close.
+ Error handle:[:ex |
+ Logger warning:'ResourcePack [warning]: aborted read of "%1" due to error: %2'
+ with:triedFilename
+ with:ex description.
+ ok := false.
+ ] do:[
+ [
+ ok := self readFromResourceStream:inStream in:(triedFilename asFilename directoryName).
+ ] ensure:[
+ inStream close.
+ ].
].
-
+
ok ifTrue:[
packsFileName := triedFilename
] ifFalse:[
@@ -1749,7 +1756,7 @@
].
"Modified: / 20-08-2011 / 17:10:02 / cg"
- "Modified: / 27-03-2019 / 11:01:57 / Claus Gittinger"
+ "Modified: / 06-05-2019 / 13:57:25 / Claus Gittinger"
!
readFromResourceStream:inStream in:dirName