diff --git a/src/mred/wrap/mred.ss b/src/mred/wrap/mred.ss
index d0b5e657..0b092aa9 100644
--- a/src/mred/wrap/mred.ss
+++ b/src/mred/wrap/mred.ss
@@ -3594,6 +3594,7 @@
     (inherit delete-by-position)
     (rename [super-delete delete])
     (public
+      [get-container (lambda () this)]
       [get-keymap (lambda () keymap)]
       [get-mred (lambda () mred)]
       [get-items (lambda () items)]