[svn-r5066]

Purpose:
    Bug fix
Description:
    I borrowed function HDpackFstring from the HDF4 Library and
    left name unchanged. It causes linking problems for Fortran users
    that use both HDF4 and HDF5 Libraries in their applications.
Solution:
    Changed the name to be HD5packFstring
Platforms tested:
    Solaris 2.7

1 files changed, 5 insertions, 5 deletions

diff --git a/fortran/src/H5f90kit.c b/fortran/src/H5f90kit.c
index cfbca28..f782cbf 100644
--- a/fortran/src/H5f90kit.c
+++ b/fortran/src/H5f90kit.c
@@ -69,12 +69,12 @@ HD5f2cstring(_fcd fdesc, int len)
     return cstr;
 }   /* HD5f2cstring */
 
-/* ---------------------------- HDpackFstring ----------------------------- */
+/* ---------------------------- HD5packFstring ----------------------------- */
 /*
 NAME
-   HDpackFstring -- convert a C string into a Fortran string
+   HD5packFstring -- convert a C string into a Fortran string
 USAGE
-   int HDpackFstring(src, dest, len)
+   int HD5packFstring(src, dest, len)
    char * src;          IN:  source string
    char * dest;         OUT: destination
    int   len;          IN:  length of string
@@ -90,7 +90,7 @@ DESCRIPTION
 
 ---------------------------------------------------------------------------*/
 int 
-HDpackFstring(char *src, char *dest, int len)
+HD5packFstring(char *src, char *dest, int len)
 {
     int        sofar;
 
@@ -101,5 +101,5 @@ HDpackFstring(char *src, char *dest, int len)
         *dest++ = ' ';
 
     return 0;
-}	/* HDpackFstring */
+}	/* HD5packFstring */