removed 's world

svn: r13795
2009-02-22 23:38:54 +00:00 · 2009-02-22 23:38:54 +00:00 · 2336b9c279
commit 2336b9c279
parent 42fad650c7
1 changed files with 1 additions and 1 deletions
--- 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))))