src/util.c: (read_config): Close the FILE *.

Savannah bug #40338.

Signed-off-by: James Cloos <cloos@jhcloos.com>

diff --git a/ChangeLog b/ChangeLog
index 496a149..b48c3c5 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2014-07-18  James Cloos  <cloos@jhcloos.com>
+
+       * src/util.c: (read_config): Close the FILE *. Savannah bug #40338.
+
 2012-10-08  Max Cantor  <max@maxcantor.net>
 
        * docs/enscript.man: Document how to use new fonts.

diff --git a/src/util.c b/src/util.c
index 17d89e7..a3814c1 100644 (file)
--- a/src/util.c
+++ b/src/util.c
@@ -440,6 +440,7 @@ read_config (char *path, char *file)
        CFG_FATAL ((stderr, _("illegal option: %s"), token));
     }
 
+  fclose (fp);
   buffer_uninit (&fname);
   return 1;
 }