From: erg <devnull@localhost>
Date: Mon, 16 Nov 2009 19:40:01 +0000 (+0000)
Subject: Fix bug 1816.
X-Git-Tag: LAST_LIBGRAPH~32^2~1566
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=cf1056b55305ead42c67f92e25c272d783211baf;p=graphviz

Fix bug 1816.
---

diff --git a/lib/common/input.c b/lib/common/input.c
index 7281be819..f24ceff61 100644
--- a/lib/common/input.c
+++ b/lib/common/input.c
@@ -581,6 +581,8 @@ graph_t *gvNextInputGraph(GVC_t *gvc)
 	    gvg_init(gvc, g, fn, gidx++);
 	    break;
 	}
+	if (fp != stdin)
+	    fclose (fp);
 	fp = NULL;
 	gidx = 0;
     }