More verbose data1_path_fopen if fopen fails

diff --git a/data1/d1_handle.c b/data1/d1_handle.c
index 43fea53..e5c4eaa 100644 (file)
--- a/data1/d1_handle.c
+++ b/data1/d1_handle.c
@@ -150,18 +150,21 @@ FILE *data1_path_fopen (data1_handle dh, const char *file, const char *mode)
     FILE *f;
     const char *path = data1_get_tabpath(dh);
     const char *root = data1_get_tabroot(dh);
-    if (!path || !*path)
-    {
-        yaz_log(YLOG_DEBUG, "data1_fath_fopen file=%s mode=%s no open",
-                file, mode);
-       return 0;
-    }
-    yaz_log(YLOG_DEBUG, "data1_fath_fopen path=%s root=%s "
+
+    yaz_log(YLOG_DEBUG, "data1_path_fopen path=%s root=%s "
             "file=%s mode=%s", path ? path : "NULL",
             root ? root : "NULL", file, mode);
-    f = yaz_fopen(path, file, "r", root);
+    if (!path || !*path)
+       return 0;
+    f = yaz_fopen(path, file, mode, root);
     if (!f)
+    {
        yaz_log(YLOG_WARN|YLOG_ERRNO, "Couldn't open %s", file);
+        if (root)
+            yaz_log(YLOG_LOG, "for root=%s", root);
+        if (path)
+            yaz_log(YLOG_LOG, "for profilePath=%s", path);
+    }
     return f;
 }