--- a/FileBrowserV2.st	Fri Nov 15 14:32:17 2002 +0100
+++ b/FileBrowserV2.st	Fri Nov 15 14:44:25 2002 +0100
@@ -1170,7 +1170,7 @@
                                 [
                                     shownImage := self selectedImage.
                                     lbl := shownImage ifNil:'Preview' ifNotNil:[ shownImage fileName asFilename baseName ].
-                                    previewLabel label:lbl; preferredExtent:nil; forceResize.     
+                                    previewLabel label:lbl; forceResizeHorizontally.     
                                     self enqueueMessage:#'showPreview:' for:self arguments:(Array with:shownImage).        
                                     previewProcess := nil.
                                 ] ensure:[
@@ -1440,7 +1440,7 @@
 !FileBrowserV2 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.46 2002-11-15 13:32:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.47 2002-11-15 13:44:25 cg Exp $'
 ! !
 
 FileBrowserV2 initialize!