From cfe9f447c89120f820b2998ac5d3400e784d0254 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Wed, 10 Apr 2013 10:03:23 -0600
Subject: [PATCH] fix sandbox test to avoid influence from other tests

---
 collects/tests/racket/sandbox.rktl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/collects/tests/racket/sandbox.rktl b/collects/tests/racket/sandbox.rktl
index fffa6aa060..fec2780b13 100644
--- a/collects/tests/racket/sandbox.rktl
+++ b/collects/tests/racket/sandbox.rktl
@@ -591,10 +591,10 @@
    (syntax-original? #'x) => #t
 
    --eval--
-   (putenv "APPLE" "AnApple") => #t
-   (getenv "APPLE") => "AnApple"
+   (putenv "PEAR" "A Pear") => #t
+   (getenv "PEAR") => "A Pear"
    --top--
-   (getenv "APPLE") => #f
+   (getenv "PEAR") => #f
 
    ))