diff --git a/collects/framework/frame.ss b/collects/framework/frame.ss
index ce240201..1c48adbb 100644
--- a/collects/framework/frame.ss
+++ b/collects/framework/frame.ss
@@ -1079,7 +1079,7 @@
                     (send memory-text erase)
                     (send memory-text insert (number->string (current-memory-use)))
                     (send memory-text end-edit-sequence))]
-                 [button (make-object button% "Memory" panel 
+                 [button (make-object button% "Collect" panel 
                            (lambda x
                              (collect-garbage)
                              (update-text)))]