diff --git a/collects/mrlib/switchable-button.ss b/collects/mrlib/switchable-button.ss
index ba478b69..92e2af78 100644
--- a/collects/mrlib/switchable-button.ss
+++ b/collects/mrlib/switchable-button.ss
@@ -133,6 +133,8 @@
                                         [stretchable-height #f]))
                 (new yellow-message% [parent float-window] [label label]))
 
+              (send float-window reflow-container)
+
               ;; position the floating window
 	      (let-values ([(x y) (client->screen (floor (get-width))
 						  (floor