diff --git a/collects/framework/main.ss b/collects/framework/main.ss
index 072d4131..6ea3c504 100644
--- a/collects/framework/main.ss
+++ b/collects/framework/main.ss
@@ -49,7 +49,7 @@
 		 case when unless match
 		 let-enumerate
 		 class class* class-asi class-asi* class*/names
-                 class/d class*/d class*/names/d
+                 class/d class/d* class/d*/names
                  rec
                  make-object mixin
 		 define-some do opt-lambda send*