--- a/ZipArchive.st	Wed May 22 12:23:21 2019 +0200
+++ b/ZipArchive.st	Sat May 25 23:49:00 2019 +0200
@@ -3411,13 +3411,19 @@
     "Modified: / 21-05-2019 / 20:41:06 / Claus Gittinger"
 !
 
-readFrom:aPositionableStream
+readFrom:aPositionableStreamOrFilenameString
     <resource: #obsolete>
-    "initialize the archive to read from aPositionableStream.
+    "initialize the archive to read from aPositionableStream,
+     or from the file by that name (pharo compatibility)
      Obsolete - backward compatibility."
 
     self obsoleteMethodWarning.
-    ^ self readingFrom:aPositionableStream
+    aPositionableStreamOrFilenameString isStream ifFalse:[
+        ^ self readingFrom:(aPositionableStreamOrFilenameString asFilename readStream)
+    ].    
+    ^ self readingFrom:aPositionableStreamOrFilenameString
+
+    "Modified: / 25-05-2019 / 16:42:07 / Claus Gittinger"
 !
 
 readingFrom:aPositionableStream