diff --git a/src/mred/wrap/mred.ss b/src/mred/wrap/mred.ss
index b1712faf..9077e520 100644
--- a/src/mred/wrap/mred.ss
+++ b/src/mred/wrap/mred.ss
@@ -3762,7 +3762,7 @@
 			    (send keymap remove-chained-keymap (send (mred->wx i) get-keymap))
 			    (super-enable-top p #f)))))])
     (sequence
-      (super-init null null))))
+      (super-init))))
 
 (define wx-menu%
   (class* wx:menu% (wx<%>) (mred popup-label popup-callback)