equal
deleted
inserted
replaced
405 ]. |
405 ]. |
406 |
406 |
407 clientViewIsScrolled ifTrue:[ |
407 clientViewIsScrolled ifTrue:[ |
408 (subWindowSpec notNil and:[subWindowSpec layout notNil]) ifTrue:[ |
408 (subWindowSpec notNil and:[subWindowSpec layout notNil]) ifTrue:[ |
409 "/ mhmh - what should we base the size computation on ? |
409 "/ mhmh - what should we base the size computation on ? |
410 "/ (I dont see any reason to look at the windows spec at all; |
410 "/ (I don't see any reason to look at the windows spec at all; |
411 "/ isn't the user of the spec the only one to control the size). |
411 "/ isn't the user of the spec the only one to control the size). |
412 clientView extent:(subWindowSpec bounds extent) |
412 clientView extent:(subWindowSpec bounds extent) |
413 ] ifFalse:[ |
413 ] ifFalse:[ |
414 "/ clientView extent:(subWindowSpec bounds extent) |
414 "/ clientView extent:(subWindowSpec bounds extent) |
415 ]. |
415 ]. |
602 ! ! |
602 ! ! |
603 |
603 |
604 !SubCanvas class methodsFor:'documentation'! |
604 !SubCanvas class methodsFor:'documentation'! |
605 |
605 |
606 version |
606 version |
607 ^ '$Header: /cvs/stx/stx/libwidg2/SubCanvas.st,v 1.70 2015-05-11 20:06:00 cg Exp $' |
607 ^ '$Header$' |
608 ! |
608 ! |
609 |
609 |
610 version_CVS |
610 version_CVS |
611 ^ '$Header: /cvs/stx/stx/libwidg2/SubCanvas.st,v 1.70 2015-05-11 20:06:00 cg Exp $' |
611 ^ '$Header$' |
612 ! ! |
612 ! ! |
613 |
613 |