--- a/GenericException.st	Wed May 28 19:29:10 2014 +0200
+++ b/GenericException.st	Thu May 29 12:50:36 2014 +0200
@@ -1200,7 +1200,12 @@
 !
 
 creator
-    "return the creator of the exception"
+    "return the creator of the exception. 
+     For class based exceptions, that is the exception class;
+     for signals, that is the signal itself.
+     This used to be called signal in earlier versions, 
+     but due to the conflict with VSE, Squeak, where signal means 'raise',
+     signal was obsoleted by this method."
 
     signal notNil ifTrue:[^ signal] ifFalse:[^ self class]
 !
@@ -2365,11 +2370,11 @@
 !GenericException class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/GenericException.st,v 1.153 2014-03-11 09:27:34 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/GenericException.st,v 1.154 2014-05-29 10:50:36 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/GenericException.st,v 1.153 2014-03-11 09:27:34 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/GenericException.st,v 1.154 2014-05-29 10:50:36 cg Exp $'
 ! !