From 05e2f0e9db7dbaec6a273ce0bc19b4f586127ee6 Mon Sep 17 00:00:00 2001
From: Pierre Schweitzer <pierre@reactos.org>
Date: Sat, 5 Apr 2014 15:26:12 +0000
Subject: [PATCH] [DISKPART] Fix leak

CID #716329

svn path=/trunk/; revision=62624
---
 reactos/base/system/diskpart/diskpart.c | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/reactos/base/system/diskpart/diskpart.c b/reactos/base/system/diskpart/diskpart.c
index bb27c49b9c3..62426a6bbd3 100644
--- a/reactos/base/system/diskpart/diskpart.c
+++ b/reactos/base/system/diskpart/diskpart.c
@@ -73,7 +73,10 @@ RunScript(LPCWSTR filename)
     while (fgetws(tmp_string, MAX_STRING_SIZE, script) != NULL)
     {
         if (InterpretScript(tmp_string) == FALSE)
+        {
+            fclose(script);
             return FALSE;
+        }
     }
 
     /* Close the file */