From f56af542aa6474f90f42e06614328517f904ee9e Mon Sep 17 00:00:00 2001
From: Marty Dill <mdill@uvic.ca>
Date: Sun, 20 Oct 2002 23:56:05 +0000
Subject: [PATCH] Implemented FreeEnvironmentStringsW().

svn path=/trunk/; revision=3646
---
 reactos/lib/kernel32/misc/env.c | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/reactos/lib/kernel32/misc/env.c b/reactos/lib/kernel32/misc/env.c
index 0f981f7125a..168b52c3e79 100644
--- a/reactos/lib/kernel32/misc/env.c
+++ b/reactos/lib/kernel32/misc/env.c
@@ -1,4 +1,4 @@
-/* $Id: env.c,v 1.15 2002/09/08 10:22:44 chorns Exp $
+/* $Id: env.c,v 1.16 2002/10/20 23:56:05 mdill Exp $
  *
  * COPYRIGHT:       See COPYING in the top level directory
  * PROJECT:         ReactOS system libraries
@@ -365,6 +365,13 @@ FreeEnvironmentStringsW (
 	LPWSTR	EnvironmentStrings
 	)
 {
+	if(EnvironmentStrings == NULL)
+	   return FALSE;
+	
+	RtlFreeHeap(RtlGetProcessHeap(),
+	            0,
+	            EnvironmentStrings);
+	            
 	return TRUE;
 }