--- a/TopView.st	Thu Mar 03 20:23:01 2011 +0100
+++ b/TopView.st	Thu Mar 03 20:39:59 2011 +0100
@@ -492,7 +492,7 @@
 beUndecoratedResizable
     "make me an undecorated Window"
     "experimental - do not use"
-
+"/    type := #popUpWithFrame
     type := #undecoratedResizable
 
     "Created: / 03-03-2011 / 20:22:14 / cg"
@@ -1493,11 +1493,11 @@
 !TopView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.141 2011-03-03 19:23:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.142 2011-03-03 19:39:59 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.141 2011-03-03 19:23:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/TopView.st,v 1.142 2011-03-03 19:39:59 cg Exp $'
 ! !
 
 TopView initialize!