diff --git a/collects/framework/private/panel.ss b/collects/framework/private/panel.ss
index 856f8059..6a5f1280 100644
--- a/collects/framework/private/panel.ss
+++ b/collects/framework/private/panel.ss
@@ -46,7 +46,7 @@
                       [else (error 'place-children
                                    "alignment spec is unknown ~a~n" spec)])))])
             (map (λ (l) 
-                   (let*-values ([(min-width min-height v-stretch? h-stretch?)
+                   (let*-values ([(min-width min-height h-stretch? v-stretch?)
                                   (apply values l)]
                                  [(x this-width)
                                   (if h-stretch?