--- a/ImageEditView.st	Mon Nov 02 15:40:31 2009 +0100
+++ b/ImageEditView.st	Mon Nov 02 16:17:35 2009 +0100
@@ -2511,13 +2511,14 @@
         className := LastSaveClass
     ].
 
-    classAndSelector := ResourceSelectionBrowser
-            request: 'Save Image In Class'
-            onSuperclass: #Object
-            andClass: className
-            andSelector: self resourceSelector
-            withResourceTypes: #(image fileImage programImage).
-
+    self withWaitCursorDo:[
+        classAndSelector := ResourceSelectionBrowser
+                request: 'Save Image In Class'
+                onSuperclass: #Object
+                andClass: className
+                andSelector: self resourceSelector
+                withResourceTypes: #(image fileImage programImage).
+    ].
     classAndSelector isNil ifTrue:[^ false].
 
     resourceClass := classAndSelector methodClass.
@@ -2651,11 +2652,11 @@
 !ImageEditView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ImageEditView.st,v 1.236 2009-10-15 17:09:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ImageEditView.st,v 1.237 2009-11-02 15:17:35 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/ImageEditView.st,v 1.236 2009-10-15 17:09:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ImageEditView.st,v 1.237 2009-11-02 15:17:35 cg Exp $'
 ! !
 
 ImageEditView initialize!