Fix unclosed test file.

diff --git a/pgbadger b/pgbadger
index 3f0d9cff761c9a6a5ab1b02a8ca4a033568455a6..2a2a55e22855e699086a994a94ae196939a454e1 100755 (executable)
--- a/pgbadger
+++ b/pgbadger
@@ -11284,7 +11284,7 @@ sub autodetect_format
 
        localdie("FATAL: can't open file $file, $!\n") unless(open(TESTFILE, $file));
        my $fltf = <TESTFILE>;
-       close($fltf);
+       close(TESTFILE);
        # is file in binary format ?
        if ( $fltf =~ /^pst\d/ ) {
                $fmt = 'binary';