--- a/UIGalleryView.st	Mon Jan 05 16:48:25 1998 +0100
+++ b/UIGalleryView.st	Mon Jan 05 17:47:02 1998 +0100
@@ -338,7 +338,10 @@
             specification := nil.
           ^ self
         ].
-        builder := uiBuilder ? UIBuilder new.
+        (builder := uiBuilder) isNil ifTrue:[
+            builder := UIBuilder new isEditing:true
+        ].
+
         specification buildViewFor:builder in:self.
 
         subViews do:[:v|