diff --git a/User/Library/UserFile.c b/User/Library/UserFile.c
index 3f13b11990c..d6c411b7852 100644
--- a/User/Library/UserFile.c
+++ b/User/Library/UserFile.c
@@ -131,6 +131,7 @@ UserWriteFile (
   }
 
   if (fwrite (Data, Size, 1, FilePtr) != 1) {
+    fclose (FilePtr);
     abort ();
   }