UIGalleryView.st
changeset 205 1188254dcbfc
parent 191 2f66509899a0
child 239 ce46eb6f92a5
equal deleted inserted replaced
204:8dcd7f22e4d1 205:1188254dcbfc
   327         ]
   327         ]
   328     ].
   328     ].
   329 
   329 
   330     aSpecOrSpecArray notNil ifTrue:[
   330     aSpecOrSpecArray notNil ifTrue:[
   331         specification := UISpecification from:aSpecOrSpecArray.
   331         specification := UISpecification from:aSpecOrSpecArray.
       
   332 
       
   333         (specification respondsTo:#buildViewFor:in:) ifFalse:[
       
   334             specification := nil.
       
   335           ^ self
       
   336         ].
   332         builder := uiBuilder ? UIBuilder new.
   337         builder := uiBuilder ? UIBuilder new.
   333         specification buildViewFor:builder in:self.
   338         specification buildViewFor:builder in:self.
   334 
   339 
   335         subViews do:[:v|
   340         subViews do:[:v|
   336             (v ~~ inputView and:[(self findSpecFor:v) notNil]) ifTrue:[
   341             (v ~~ inputView and:[(self findSpecFor:v) notNil]) ifTrue:[