--- a/WindowBuilder.st	Mon Aug 23 19:54:34 1999 +0200
+++ b/WindowBuilder.st	Tue Aug 24 01:12:02 1999 +0200
@@ -976,7 +976,9 @@
         ].
         nameKey := name asSymbol.
         "/ debugging ...
-        (namedComponents includesKey:nameKey) ifTrue:[self error:'multiple UI-build'].
+        (namedComponents includesKey:nameKey) ifTrue:[
+            Transcript showCR:'WARNING multiple UI-build of: ',nameKey
+        ].
         namedComponents at:nameKey put:aView
     ].
     componentCreationHook notNil ifTrue:[
@@ -1240,5 +1242,5 @@
 !WindowBuilder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/WindowBuilder.st,v 1.80 1999-08-23 17:54:34 tm Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/WindowBuilder.st,v 1.81 1999-08-23 23:12:02 cg Exp $'
 ! !