From 01f102c2d49d6f25a6bbdaeb874e51e764d7df72 Mon Sep 17 00:00:00 2001
From: Quincey Koziol <koziol@hdfgroup.org>
Date: Thu, 6 Jun 2002 14:09:58 -0500
Subject: [svn-r5547] Purpose:     Bug fix.

Description:
    H5Fopen call was using H5P_DEFAULT instead of file access flags

Solution:
    Changed H5P_DEFAULT to H5F_ACC_RDONLY

Platforms tested:
    IRIX64 6.5 (modi4) w/parallel
---
 perform/pio_engine.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perform/pio_engine.c b/perform/pio_engine.c
index 27251c3..cbd77e7 100644
--- a/perform/pio_engine.c
+++ b/perform/pio_engine.c
@@ -1285,7 +1285,7 @@ do_fopen(parameters *param, char *fname, file_descr *fd /*out*/, int flags)
         if (flags & (PIO_CREATE | PIO_WRITE)) {
             fd->h5fd = H5Fcreate(fname, H5F_ACC_TRUNC, H5P_DEFAULT, acc_tpl);
         } else {
-            fd->h5fd = H5Fopen(fname, H5P_DEFAULT, acc_tpl);
+            fd->h5fd = H5Fopen(fname, H5F_ACC_RDONLY, acc_tpl);
         }
 
         hrc = H5Pclose(acc_tpl);
-- 
cgit v0.12