equal
deleted
inserted
replaced
624 ! ! |
624 ! ! |
625 |
625 |
626 !FileSelectionBox methodsFor:'queries'! |
626 !FileSelectionBox methodsFor:'queries'! |
627 |
627 |
628 preferredExtent |
628 preferredExtent |
629 "return my preferred extent - thats the minimum size |
629 "return my preferred extent |
630 to make everything visible" |
630 - that's the minimum size to make everything visible" |
631 |
631 |
632 |wWanted hWanted mm| |
632 |wWanted hWanted mm| |
633 |
633 |
634 "/ If I have an explicit preferredExtent.. |
634 "/ If I have an explicit preferredExtent.. |
635 explicitExtent notNil ifTrue:[ |
635 explicitExtent notNil ifTrue:[ |