From 5c1254dae0f347d5c0f860b42c0d3ea8df45adfe Mon Sep 17 00:00:00 2001
From: Marius Vollmer <mvo@zagadka.de>
Date: Thu, 9 May 2002 19:36:30 +0000
Subject: [PATCH] (unsetenv): New, for completeness.

---
 ice-9/boot-9.scm | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/ice-9/boot-9.scm b/ice-9/boot-9.scm
index 36fc11470..7dfa381aa 100644
--- a/ice-9/boot-9.scm
+++ b/ice-9/boot-9.scm
@@ -599,6 +599,10 @@
       (putenv (string-append name "=" value))
       (putenv name)))
 
+(define (unsetenv name)
+  "Remove the entry for NAME from the environment."
+  (putenv name))
+
 
 ;;; {Load Paths}
 ;;;