From 469eb89edcfcd791a94ff18e917c98853d0a4346 Mon Sep 17 00:00:00 2001
From: Julian Smart <julian@anthemion.co.uk>
Date: Tue, 17 Aug 1999 10:27:04 +0000
Subject: [PATCH] Fixed bug that wrote incomplete wxExpr files (missing fclose)

git-svn-id: https://svn.wxwidgets.org/svn/wx/wxWidgets/trunk@3398 c3d73ce0-8a6f-49c7-b76d-6d57e0e08775
---
 src/common/wxexpr.cpp | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/common/wxexpr.cpp b/src/common/wxexpr.cpp
index 08f4affcd7..951445a595 100644
--- a/src/common/wxexpr.cpp
+++ b/src/common/wxexpr.cpp
@@ -1031,7 +1031,9 @@ bool wxExprDatabase::Write(const wxString& fileName)
   if (!stream)
     return FALSE;
     
-  return Write(stream);
+  bool success = Write(stream);
+  fclose(stream);
+  return success;
 }
 
 bool wxExprDatabase::Write(FILE *stream)