diff --git a/src/mzscheme/src/read.c b/src/mzscheme/src/read.c
index 43dcc45a1c..33e52b7c4b 100644
--- a/src/mzscheme/src/read.c
+++ b/src/mzscheme/src/read.c
@@ -1344,14 +1344,14 @@ read_inner_inner(Scheme_Object *port, Scheme_Object *stxsrc, Scheme_Hash_Table *
 	      params_copy.honu_mode = 1;
 
 	      if (honu == 1) {
-		v = read_inner(port, stxsrc, ht, indentation, params, 0);
+		v = read_inner(port, stxsrc, ht, indentation, &params_copy, 0);
 		if (SCHEME_EOFP(v)) {
 		  scheme_read_err(port, stxsrc, line, col, pos, 2, EOF, indentation,
 				  "read: end-of-file after #hx");
 		  return NULL;
 		}
 	      } else
-		v = read_list(port, stxsrc, line, col, pos, EOF, mz_shape_cons, 0, ht, indentation, params);
+		v = read_list(port, stxsrc, line, col, pos, EOF, mz_shape_cons, 0, ht, indentation, &params_copy);
 
 	      return v;
 	    } else {
diff --git a/src/mzscheme/src/startup.inc b/src/mzscheme/src/startup.inc
index 1d348d5506..73e6d98f87 100644
--- a/src/mzscheme/src/startup.inc
+++ b/src/mzscheme/src/startup.inc
@@ -3103,7 +3103,7 @@
 "(parameterize((current-namespace n))"
 "(namespace-attach-module orig '#%r5rs)"
 "(namespace-require '#%r5rs)"
-"(namespace-transformer-require '(rename mzscheme syntax-rules syntax-rules))"
+"(namespace-transformer-require '(only mzscheme syntax-rules))"
 "(unless stx-only?"
 "(for-each"
 "(lambda(n)"
@@ -3236,7 +3236,7 @@
 " #%app #%datum #%top))"
 );
   EVAL_ONE_STR(
-"(require(rename mzscheme namespace-require/copy namespace-require/copy))"
+"(require(only mzscheme namespace-require/copy))"
 );
   EVAL_ONE_STR(
 "(begin"