From 79a594b1cce73fabffaa2161bd4550ffbd0d2763 Mon Sep 17 00:00:00 2001
From: James LewisMoss <dres@debian.org>
Date: Mon, 18 Jun 2001 00:22:49 +0000
Subject: [PATCH] * src/engine/io-gncxml-v2.c (gnc_book_write_to_xml_file_v2):
 check return of fclose.

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@4721 57a11ea4-9604-0410-9ed3-97b8803252fd
---
 src/engine/io-gncxml-v2.c | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/engine/io-gncxml-v2.c b/src/engine/io-gncxml-v2.c
index 92370480ad..5d1373350b 100644
--- a/src/engine/io-gncxml-v2.c
+++ b/src/engine/io-gncxml-v2.c
@@ -519,7 +519,10 @@ gnc_book_write_to_xml_file_v2(GNCBook *book, const char *filename)
     fprintf(out, "</" GNC_V2_STRING ">\n\n");
     write_emacs_trailer(out);
 
-    fclose(out);
+    if(fclose(out) != 0)
+    {
+        return FALSE;
+    }
     
     return TRUE;
 }