--- a/FileApplicationNoteBook.st	Tue May 03 17:49:29 2011 +0200
+++ b/FileApplicationNoteBook.st	Tue May 03 18:35:19 2011 +0200
@@ -650,7 +650,9 @@
     self privateTabList add:(Text fromString:(anApplication getTabString)).
     self viewNoteBookApplicationHolder value:true.
     self enableViewNoteBookApplication value:true.
-    self doSelect:anApplication.
+    self withWaitCursorDo:[
+        self doSelect:anApplication.
+    ].
 "/    [
         anApplication postOpenWith:anApplication builder.
 "/    ] forkAt:Processor activePriority.
@@ -4995,8 +4997,9 @@
         text := self getContents.
     ].
     text isNil ifTrue:[ ^ false].
-
-    self setContentsFor:text.
+    self withWaitCursorDo:[
+        self setContentsFor:text.
+    ].
     ^ true
 !
 
@@ -6302,9 +6305,9 @@
 !FileApplicationNoteBook class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.248 2011-05-03 15:48:08 mb Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.249 2011-05-03 16:35:19 ab Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.248 2011-05-03 15:48:08 mb Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.249 2011-05-03 16:35:19 ab Exp $'
 ! !