summaryrefslogtreecommitdiffstats
path: root/fortran
diff options
context:
space:
mode:
Diffstat (limited to 'fortran')
-rw-r--r--fortran/src/H5Pf.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/src/H5Pf.c b/fortran/src/H5Pf.c
index 29ba593..cf5eb7d 100644
--- a/fortran/src/H5Pf.c
+++ b/fortran/src/H5Pf.c
@@ -1719,7 +1719,7 @@ nh5pget_external_c(hid_t_f *prp_id, int_f *idx, size_t_f* name_size, _fcd name,
* from the function then we need to give HD5packFstring the fortran buffer size so
* that it fills the remaining unused characters with blanks. MSB
*/
- HD5packFstring(c_name, _fcdtocp(name), c_namelen+1);
+ HD5packFstring(c_name, _fcdtocp(name), c_namelen);
ret_value = 0;
DONE: