--- a/GenericException.st	Sun Jun 14 22:08:04 2009 +0200
+++ b/GenericException.st	Tue Jun 16 11:43:00 2009 +0200
@@ -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
-    ^ '$Header: /cvs/stx/stx/libbasic/GenericException.st,v 1.116 2009-05-20 11:38:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/GenericException.st,v 1.117 2009-06-16 09:43:00 stefan Exp $'
 ! !
 
 GenericException initialize!