diff --git a/collects/2htdp/private/world.ss b/collects/2htdp/private/world.ss
index b94a99ef97..94ceb20d58 100644
--- a/collects/2htdp/private/world.ss
+++ b/collects/2htdp/private/world.ss
@@ -161,7 +161,7 @@
                              (define/augment (on-close)  
                                (callback-stop! 'frame-stop)
                                (custodian-shutdown-all play-back:cust)))
-                           (label (if name (format "~a's World" name) "World"))
+                           (label (if name (format "~a" name) "World"))
                            (stretchable-width #f)
                            (stretchable-height #f)
                            (style '(no-resize-border metal))))