diff --git a/collects/mred/private/wxtop.ss b/collects/mred/private/wxtop.ss
index b1363a1b..3074a5b7 100644
--- a/collects/mred/private/wxtop.ss
+++ b/collects/mred/private/wxtop.ss
@@ -372,7 +372,7 @@
 	[center (lambda (dir)
 		  (when pending-redraws? (force-redraw))
 		  (set! use-default-position? #f)
-		  (super center dir parent-for-center))]
+		  '(super center dir parent-for-center))]
 	
 	;; on-size: ensures that size of frame matches size of content
 	;; input: new-width/new-height: new size of frame