From 73de2a8cc9e31ff20cf4afb99f34ecaf83cb87f2 Mon Sep 17 00:00:00 2001
From: Linas Vepstas <linas@linas.org>
Date: Mon, 22 Nov 1999 08:21:16 +0000
Subject: [PATCH] patch from rob browning

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@1973 57a11ea4-9604-0410-9ed3-97b8803252fd
---
 src/engine/FileIO.c | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/src/engine/FileIO.c b/src/engine/FileIO.c
index 822de97429..5bc889ed8c 100644
--- a/src/engine/FileIO.c
+++ b/src/engine/FileIO.c
@@ -1361,8 +1361,14 @@ writeAccountGroupToFile( const char *datafile, AccountGroup *grp )
     }
   
   err = xaccWriteAccountGroup (fd, grp);
+  if(0 != err)
+    {
+    /* Just close it and return the earlier error. */
+    close(fd);
+    return err;
+    }
 
-  close(fd);
+  err = close(fd);
 
   return err;
   }