X-Git-Url: http://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=test%2Fdemo_forms.c;h=97125e396e5fc0720069a08117ef9a6075588b32;hp=7ba067c13a78d979c1ccb541d5930e899cfab502;hb=76a479337308b4b5e749fa8c38b7b7f482998c5b;hpb=73b54c0812e4b8dfddcf87f59c7488bb3c10e10d

diff --git a/test/demo_forms.c b/test/demo_forms.c
index 7ba067c1..97125e39 100644
--- a/test/demo_forms.c
+++ b/test/demo_forms.c
@@ -26,7 +26,7 @@
  * authorization.                                                           *
  ****************************************************************************/
 /*
- * $Id: demo_forms.c,v 1.49 2014/08/02 23:11:57 tom Exp $
+ * $Id: demo_forms.c,v 1.50 2014/10/10 00:38:00 tom Exp $
  *
  * Demonstrate a variety of functions from the form library.
  * Thomas Dickey - 2003/4/26
@@ -172,6 +172,7 @@ read_data(const char *filename)
 		failed("expected a colon");
 	    }
 	}
+	fclose(fp);
     } else {
 	failed(filename);
     }