From 5f33f9cdde2900cb74e6281f8d848bc874c12d95 Mon Sep 17 00:00:00 2001
From: Jeffrey Armstrong <jeff@approximatrix.com>
Date: Mon, 22 Nov 2021 08:47:32 -0500
Subject: Files for writing are now opened as binaries on Windows

---
 libzip-wrapper.prj | 16 ++++++++--------
 zwrapper.c         |  2 +-
 2 files changed, 9 insertions(+), 9 deletions(-)

diff --git a/libzip-wrapper.prj b/libzip-wrapper.prj
index 68d31be..18d55a6 100644
--- a/libzip-wrapper.prj
+++ b/libzip-wrapper.prj
@@ -1,19 +1,19 @@
 {
   "Root":{
     "Folders":[],
-    "Name":"+libzip-wrapper (funzip)",
+    "Name":"+libzip-wrapper (funzip.exe)",
     "Files":[{
-        "filename":"funzip.f90",
+        "filename":".\\funzip.f90",
         "enabled":"1"
       },{
-        "filename":"unzip_wrap.f90",
+        "filename":".\\unzip_wrap.f90",
         "enabled":"1"
       },{
-        "filename":"zwrapper.c",
+        "filename":".\\zwrapper.c",
         "enabled":"1"
       }]
   },
-  "Name":"libzip-wrapper (funzip)",
+  "Name":"libzip-wrapper (funzip.exe)",
   "Options":{
     "Compiler Options":{
       "Fortran Flags":"",
@@ -25,12 +25,12 @@
     "Revision":2,
     "Windows GUI":0,
     "File Options":{
-      "Library Directories":["Default Library Directory"],
+      "Library Directories":["Default Library Directory","../../libzip-1.8.0/install/lib"],
       "Build Directory":"build",
       "Module Directory":"modules",
-      "Include Directories":["Default Include Directory"]
+      "Include Directories":["Default Include Directory","../../libzip-1.8.0/install/include"]
     },
-    "Target":"funzip",
+    "Target":"funzip.exe",
     "Fortran Options":{
       "Use C Preprocessor":"false",
       "Runtime Diagnostics":"false",
diff --git a/zwrapper.c b/zwrapper.c
index 6d07f2b..3d73835 100644
--- a/zwrapper.c
+++ b/zwrapper.c
@@ -95,7 +95,7 @@ FILE *fp_index;
             
             } else {
                 zf = zip_fopen_index(za, i, 0);
-                fp = fopen(fullfile, "w");
+                fp = fopen(fullfile, "wb");
                 if(zf != NULL && fp != NULL) {
                 
                     total_read = 0;
-- 
cgit v1.2.3