--- a/GenericException.st	Sun Aug 16 18:14:23 2009 +0100
+++ b/GenericException.st	Wed Aug 19 17:14:36 2009 +0100
@@ -1528,11 +1528,11 @@
     con unwind:nil.
 
     "
-     Object errorSignal handle:[:ex |
+     Error handle:[:ex |
         '1' printCR.
         ex reject
      ] do:[
-        Object errorSignal handle:[:ex |
+        Error handle:[:ex |
             '2' printCR.
             ex reject
         ] do:[
@@ -2060,7 +2060,7 @@
 !GenericException class methodsFor:'documentation'!
 
 version
-    ^ '$Id: GenericException.st 10448 2009-06-14 16:10:51Z vranyj1 $'
+    ^ '$Id: GenericException.st 10467 2009-08-19 16:14:36Z vranyj1 $'
 ! !
 
 GenericException initialize!