--- a/FileBrowserV2.st	Mon Feb 02 18:08:15 2004 +0100
+++ b/FileBrowserV2.st	Mon Feb 02 18:11:53 2004 +0100
@@ -14,7 +14,7 @@
 
 AbstractFileBrowser subclass:#FileBrowserV2
 	instanceVariableNames:'fileEntryFieldHolder pathEntryField previewProcess
-		listOfDeviceDrives selectedDeviceDrive'
+		listOfDeviceDrives selectedDeviceDrive imgView'
 	classVariableNames:''
 	poolDictionaries:''
 	category:'Interface-Tools-File'
@@ -1443,13 +1443,12 @@
 !
 
 updatePreview
-    |previewLabel imgView shownImage plug|
-
-    shownImage := nil.
-    imgView := builder componentAt:#Preview.
-    previewLabel := builder componentAt:#PreviewLabel.
+    |previewLabel shownImage plug|
 
     self previewVisibleHolder value ifTrue:[
+        shownImage := nil.
+        imgView := builder componentAt:#Preview.
+        previewLabel := builder componentAt:#PreviewLabel.
         plug := Plug new.
         plug respondTo:#closePreview with:[ self previewVisibleHolder value:false ].
 
@@ -1651,7 +1650,7 @@
 !FileBrowserV2 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.104 2004-02-02 09:47:27 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.105 2004-02-02 17:11:53 penk Exp $'
 ! !
 
 FileBrowserV2 initialize!