diff --git a/src/mzscheme/src/env.c b/src/mzscheme/src/env.c
index 1bca08a509..ce4613ed0c 100644
--- a/src/mzscheme/src/env.c
+++ b/src/mzscheme/src/env.c
@@ -4436,7 +4436,7 @@ id_intdef_remove(int argc, Scheme_Object *argv[])
   Scheme_Object *l, *res, *skips;
 
   if (!SCHEME_STXP(argv[0]) || !SCHEME_SYMBOLP(SCHEME_STX_VAL(argv[0])))
-    scheme_wrong_type("identifier-from-from-definition-context", 
+    scheme_wrong_type("identifier-remove-from-definition-context", 
                       "syntax identifier", 0, argc, argv);
   
   l = argv[1];