--- a/RecursionError.st	Fri Apr 26 18:03:27 2013 +0100
+++ b/RecursionError.st	Mon Apr 29 19:43:44 2013 +0100
@@ -12,10 +12,10 @@
 "{ Package: 'stx:libbasic' }"
 
 Error subclass:#RecursionError
-	instanceVariableNames:''
-	classVariableNames:''
-	poolDictionaries:''
-	category:'Kernel-Exceptions-Errors'
+    instanceVariableNames: ''
+    classVariableNames: ''
+    poolDictionaries: ''
+    category: 'Kernel-Exceptions-Errors'
 !
 
 !RecursionError class methodsFor:'documentation'!
@@ -41,6 +41,18 @@
 "
 ! !
 
+
+!RecursionError class methodsFor:'initialization'!
+
+initialize
+    NotifierString := 'recursion limit reached'.
+
+    "
+     self initialize
+    "
+! !
+
+
 !RecursionError class methodsFor:'queries'!
 
 mayProceed
@@ -51,10 +63,11 @@
     "Created: / 10.11.2001 / 15:10:56 / cg"
 ! !
 
+
 !RecursionError class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/RecursionError.st,v 1.5 2003/08/29 19:14:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/RecursionError.st,v 1.6 2013-04-27 10:09:34 cg Exp $'
 !
 
 version_SVN
@@ -62,4 +75,4 @@
 ! !
 
 
-
+RecursionError initialize!