From 2281249bcd11bf9a4cc861ae7b13e5f86afea181 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Tue, 22 Nov 2005 02:52:52 +0000
Subject: [PATCH] revert previous change

svn: r1366
---
 src/mzscheme/src/module.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/mzscheme/src/module.c b/src/mzscheme/src/module.c
index 14e99e894f..a8482fb3ec 100644
--- a/src/mzscheme/src/module.c
+++ b/src/mzscheme/src/module.c
@@ -1982,7 +1982,7 @@ Scheme_Object *scheme_check_accessible_in_module(Scheme_Env *env, Scheme_Object
       || (env->module->primitive)
       /* For now[?], we're pretending that all definitions exists for
 	 non-0 local phase. */
-      || (env->mod_phase != env->phase)) {
+      || env->mod_phase) {
     if (want_pos)
       return scheme_make_integer(-1);
     else