--- a/Tools__InlineMessageDialog.st	Fri Apr 19 11:36:55 2013 +0200
+++ b/Tools__InlineMessageDialog.st	Fri Apr 19 11:37:06 2013 +0200
@@ -28,13 +28,13 @@
 "{ NameSpace: Tools }"
 
 ApplicationModel subclass:#InlineMessageDialog
-        instanceVariableNames:'messageHolder progressHolder backgroundColorHolder
-                backgroundColorOrDefaultHolder progressView panelView
-                panelViewComponents specHolder panelShownHolder panelHiddenHolder
-                worker layout changeLayoutUponShowHide'
-        classVariableNames:''
-        poolDictionaries:''
-        category:'Interface-Tools'
+	instanceVariableNames:'messageHolder progressHolder backgroundColorHolder
+		backgroundColorOrDefaultHolder progressView panelView
+		panelViewComponents specHolder panelShownHolder panelHiddenHolder
+		worker layout changeLayoutUponShowHide'
+	classVariableNames:''
+	poolDictionaries:''
+	category:'Interface-Tools'
 !
 
 !InlineMessageDialog class methodsFor:'documentation'!
@@ -318,7 +318,7 @@
 !InlineMessageDialog class methodsFor:'others'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__InlineMessageDialog.st,v 1.11 2013-03-31 20:32:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__InlineMessageDialog.st,v 1.12 2013-04-19 09:37:06 cg Exp $'
 ! !
 
 !InlineMessageDialog methodsFor:'accessing'!
@@ -379,7 +379,7 @@
     worker isNil ifTrue:[ self hide. ^ self ].
     worker interruptWith:[
         NoHandlerError handle:[:ex |
-            ex parameter signal == AbortOperationRequest ifTrue:[
+            ex exception creator == AbortOperationRequest ifTrue:[
                 ex return.
             ].
             ex reject.
@@ -937,7 +937,7 @@
 !InlineMessageDialog class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__InlineMessageDialog.st,v 1.11 2013-03-31 20:32:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__InlineMessageDialog.st,v 1.12 2013-04-19 09:37:06 cg Exp $'
 !
 
 version_HG