--- a/ProceedError.st	Fri Apr 19 09:38:48 2013 +0200
+++ b/ProceedError.st	Tue Apr 23 14:27:19 2013 +0100
@@ -12,10 +12,10 @@
 "{ Package: 'stx:libbasic' }"
 
 Warning subclass:#ProceedError
-	instanceVariableNames:''
-	classVariableNames:''
-	poolDictionaries:''
-	category:'Kernel-Exceptions-Errors'
+    instanceVariableNames: ''
+    classVariableNames: ''
+    poolDictionaries: ''
+    category: 'Kernel-Exceptions-Errors'
 !
 
 !ProceedError class methodsFor:'documentation'!
@@ -53,6 +53,7 @@
 
 ! !
 
+
 !ProceedError class methodsFor:'initialization'!
 
 initialize
@@ -66,13 +67,14 @@
 
 ! !
 
+
 !ProceedError methodsFor:'default actions'!
 
 defaultAction
     "make proceeding from a non-proceedable raise a warning for now.
      This will change in future revisions"
 
-    ('WARNING: signal <', parameter signal printString, '> has been raised nonproceedable') errorPrintCR.
+    ('WARNING: signal <', parameter creator printString, '> has been raised nonproceedable') errorPrintCR.
     ('         by: ', parameter suspendedContext printString) errorPrintCR.
     ('         ', suspendedContext printString , ' tries to proceed.') errorPrintCR.
     ('         This will be an error in future ST/X versions.') errorPrintCR.
@@ -94,17 +96,16 @@
    "
 ! !
 
+
 !ProceedError class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProceedError.st,v 1.5 2003/08/29 19:14:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProceedError.st,v 1.6 2013-04-19 08:40:03 cg Exp $'
 !
 
 version_SVN
     ^ '$Id: ProceedError.st 10761 2012-01-19 11:46:00Z vranyj1 $'
 ! !
 
+
 ProceedError initialize!
-
-
-