--- a/ZipArchive.st	Thu Jan 26 11:59:02 2017 +0100
+++ b/ZipArchive.st	Thu Jan 26 13:56:36 2017 +0100
@@ -3726,7 +3726,7 @@
 addMember:zmemb
     "add a zipMember"
 
-    (firstEntry == nil) ifTrue:[
+    (firstEntry isNil) ifTrue:[
         firstEntry := zmemb
     ] ifFalse:[
         lastEntry next:zmemb.
@@ -3989,7 +3989,6 @@
     ^ false.
 ! !
 
-
 !ZipArchive methodsFor:'reading'!
 
 extract:fileName
@@ -4099,7 +4098,6 @@
     "Created: / 21-11-2010 / 11:51:41 / cg"
 ! !
 
-
 !ZipArchive methodsFor:'reading - stream'!
 
 extract:fileName intoStream: aWriteStream