--- a/FilenameWidgetWithHistory.st Fri May 30 14:25:47 2008 +0200
+++ b/FilenameWidgetWithHistory.st Fri May 30 14:26:05 2008 +0200
@@ -95,9 +95,9 @@
^ preferredExtent
].
- preferredExtent := (fileNameEntryField preferredExtent x + browseButton preferredExtent x)
+ preferredExtent := (fileNameEntryField preferredWidth + browseButton preferredWidth)
@
- (fileNameEntryField preferredExtent y "max: browseButton preferredExtent y").
+ (fileNameEntryField preferredHeight "max: browseButton preferredExtent y").
^ preferredExtent
! !
@@ -127,5 +127,5 @@
!FilenameWidgetWithHistory class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.2 2008-01-22 22:32:16 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/FilenameWidgetWithHistory.st,v 1.3 2008-05-30 12:26:05 cg Exp $'
! !