diff --git a/vfs/ChangeLog b/vfs/ChangeLog
index 4ca2b2a81..f58f9aec5 100644
--- a/vfs/ChangeLog
+++ b/vfs/ChangeLog
@@ -1,3 +1,8 @@
+2002-07-03  Pavel Roskin  <proski@gnu.org>
+
+	* cpio.c (cpio_open_cpio_file): Fix type initialization.
+	From Andrew V. Samoilov <kai@cmail.ru>
+
 2002-07-02  Pavel Roskin  <proski@gnu.org>
 
 	* Makefile.am: Add samba to SUBDIRS.  Forcedly set DISTDIRS to
@@ -7,7 +12,7 @@
 
 	* ftpfs.c (send_ftp_command): Use "anonymous@" as default
 	anonymous password.
-	From Eduardo Perez Ureta" <eperez@it.uc3m.es>
+	From Eduardo Perez Ureta <eperez@it.uc3m.es>
 
 2002-06-25  Pavel Roskin  <proski@gnu.org>
 
diff --git a/vfs/cpio.c b/vfs/cpio.c
index 5b08d6054..60dd16423 100644
--- a/vfs/cpio.c
+++ b/vfs/cpio.c
@@ -149,7 +149,8 @@ static int cpio_open_cpio_file(vfs *me, vfs_s_super *super, char *name)
     mc_stat(name, &(super->u.cpio.stat));
     super->u.cpio.type = CPIO_UNKNOWN;
 
-    if (get_compression_type(fd) != COMPRESSION_NONE) {
+    type = get_compression_type(fd);
+    if (type != COMPRESSION_NONE) {
 	char *s;
 
 	mc_close(fd);