--- a/FileApplicationNoteBook.st	Tue Mar 18 12:27:50 2003 +0100
+++ b/FileApplicationNoteBook.st	Tue Mar 18 12:28:19 2003 +0100
@@ -3954,7 +3954,9 @@
             contents := file contents.
         ] ifFalse:[
             present == #hexDump ifTrue:[
-                contents := AbstractFileBrowser contentsOfFileAsHexDump:file.
+                self withWaitCursorDo:[
+                    contents := AbstractFileBrowser contentsOfFileAsHexDump:file.
+                ]
             ]
         ]
     ].
@@ -4927,5 +4929,5 @@
 !FileApplicationNoteBook class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.69 2003-03-02 20:49:37 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.70 2003-03-18 11:28:19 cg Exp $'
 ! !