From: Sven Verdoolaege <skimo@breughel.ufsia.ac.be>
Date: Tue, 15 Apr 1997 08:32:46 +0000 (+0200)
Subject: Fix for environment leak
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=114695e977a20e0c66aa94b08414017d929a3f66;p=p5sagit%2Fp5-mst-13.2.git

Fix for environment leak

This patch fixes a leak in my_setenv.
I know this is close to the release of 5.004, but this is
relatively important for long running FastCGI programs.

I can prove the correctness :-)

p5p-msgid: 19970415103246.NN46698@breughel.ufsia.ac.be
---

diff --git a/util.c b/util.c
index 6e5ef47..3b496ed 100644
--- a/util.c
+++ b/util.c
@@ -1350,6 +1350,7 @@ char *nam, *val;
 	environ = tmpenv;		/* tell exec where it is now */
     }
     if (!val) {
+	if (environ[i]) Safefree(environ[i]);
 	while (environ[i]) {
 	    environ[i] = environ[i+1];
 	    i++;