diff --git a/collects/tests/mred/mem.ss b/collects/tests/mred/mem.ss
index 10a43808..3b556487 100644
--- a/collects/tests/mred/mem.ss
+++ b/collects/tests/mred/mem.ss
@@ -171,6 +171,7 @@
 	  (let* ([mb (remember tag (make-object menu-bar% ef))]
 		 [m (remember tag (make-object menu% "Ok" mb))])
 	    (remember tag (make-object menu-item% "Hi" m void))
+	    (remember tag (make-object menu-item% "There" m void #\t))
 	    (remember tag
 		      (make-object checkable-menu-item%
 				   "Checkable"