WindowBuilder.st
changeset 1727 9e0c69cb6974
parent 1725 a9945722dab2
child 1763 fabe0b506e33
equal deleted inserted replaced
1726:53657643e254 1727:9e0c69cb6974
  1321 "/ do thinks explicit.
  1321 "/ do thinks explicit.
  1322 
  1322 
  1323 "/        type = #slave ifTrue:[
  1323 "/        type = #slave ifTrue:[
  1324 "/            window windowGroup topViews first beMaster
  1324 "/            window windowGroup topViews first beMaster
  1325 "/        ].
  1325 "/        ].
  1326         window open.
       
  1327         ^ self
  1326         ^ self
  1328     ].
  1327     ].
  1329 
  1328 
  1330     type == #popUp ifTrue:[
  1329     type == #popUp ifTrue:[
  1331         window fixPosition:(device pointerPosition).
  1330         window fixPosition:(device pointerPosition).
  1342 ! !
  1341 ! !
  1343 
  1342 
  1344 !WindowBuilder class methodsFor:'documentation'!
  1343 !WindowBuilder class methodsFor:'documentation'!
  1345 
  1344 
  1346 version
  1345 version
  1347     ^ '$Header: /cvs/stx/stx/libview2/WindowBuilder.st,v 1.106 2003-03-21 18:40:48 cg Exp $'
  1346     ^ '$Header: /cvs/stx/stx/libview2/WindowBuilder.st,v 1.107 2003-03-24 13:48:22 ab Exp $'
  1348 ! !
  1347 ! !