# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 932468450 -7200
# Node ID 5ca42a599a49dd80871c511d0fa5b843c0e0ea88
# Parent  fe2354feee013ab33115fcc655c9248f921b7866
checkin from browser

diff -r fe2354feee01 -r 5ca42a599a49 UIBuilder.st
--- a/UIBuilder.st	Fri Jul 16 01:49:17 1999 +0200
+++ b/UIBuilder.st	Tue Jul 20 13:00:50 1999 +0200
@@ -122,7 +122,7 @@
 wrapper
     "ST/X has no wrappers - return the view here"
 
-    ^ view
+    ^ view ? window
 
     "Created: / 3.3.1997 / 18:28:31 / cg"
     "Modified: / 31.10.1997 / 18:42:52 / cg"
@@ -372,6 +372,6 @@
 !UIBuilder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/UIBuilder.st,v 1.42 1999-07-14 10:42:27 tm Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/UIBuilder.st,v 1.43 1999-07-20 11:00:50 cg Exp $'
 ! !
 UIBuilder initialize!