--- a/FileApplicationNoteBook.st Mon Oct 21 17:17:04 2002 +0200
+++ b/FileApplicationNoteBook.st Tue Oct 22 11:11:25 2002 +0200
@@ -3068,15 +3068,19 @@
!
setupImageView
- |img|
-
- self window topView withWaitCursorDo:[
+ |img oldCursor|
+
+ [
+ oldCursor := imageView cursor .
+ imageView cursor:Cursor wait.
+ imageView.
img := self image.
img notNil ifTrue:[
self image:img.
imageView image:img
- ]
- ]
+ ].
+ imageView cursor:oldCursor.
+ ] fork
! !
!FileApplicationNoteBook::ImageViewApplication methodsFor:'aspects'!
@@ -4511,5 +4515,5 @@
!FileApplicationNoteBook class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.16 2002-10-21 15:09:42 penk Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.17 2002-10-22 09:11:25 penk Exp $'
! !