Fix strchrlen running past end of berval

[openldap] / servers / slapd / slaptest.c

diff --git a/servers/slapd/slaptest.c b/servers/slapd/slaptest.c
index e0de63628a57fcd040247a3215a5d2e45b04d4f7..a1c6baba0f7b43ce7dac97ab215916ead8536f96 100644 (file)
--- a/servers/slapd/slaptest.c
+++ b/servers/slapd/slaptest.c
@@ -69,6 +69,7 @@ test_file( const char *fname, const char *ftype )
 
                                return -1;
                        }
+                       fclose( fp );
                        unlink( fname );
                        break;
                }