Fix file descriptor leak in error case.
Coverity CID 1295389.
diff --git a/regress/modify.c b/regress/modify.c
index ae49c6b..c79de64 100644
--- a/regress/modify.c
+++ b/regress/modify.c
@@ -628,6 +628,7 @@
 	}
 	if (fread(buf, (size_t)st.st_size, 1, fp) < 1) {
 	    free(buf);
+	    fclose(fp);
 	    *err = ZIP_ER_READ;
 	    return NULL;
 	}