--- a/GenericException.st	Sat Mar 01 23:33:23 2014 +0100
+++ b/GenericException.st	Sun Mar 02 01:17:12 2014 +0100
@@ -185,7 +185,7 @@
 new
     "{ Pragma: +inlineNew }"
 
-    ^ self basicNew creator:self.
+    ^ self basicNew initialize creator:self.
 
     "Modified: / 23.7.1999 / 13:53:12 / stefan"
     "Created: / 24.7.1999 / 13:21:13 / stefan"
@@ -194,7 +194,7 @@
 newException
     "{ Pragma: +inlineNew }"
 
-    ^ self basicNew creator:self.
+    ^ self basicNew initialize creator:self.
 
     "Created: / 23.7.1999 / 13:45:49 / stefan"
     "Modified: / 24.7.1999 / 13:21:25 / stefan"
@@ -1388,17 +1388,6 @@
     suspendedContext := raisingContext
 !
 
-signal
-    "return the signal, that caused the exception.
-     Warning and notice: in ANSI, signal means: raise;
-     here and in old VW, it is the accessor to create.
-     This will change in the near future; please use #creator to get
-     the creator. Marked as obsolete, until the change is done!!"
-
-    self obsoleteFeatureWarning:'meaning of #signal will change. Use #creator to access it, #raiseSignal to raise me'.
-    ^ self creator.
-!
-
 suspendedContext
     "return the context in which the raise occured"
 
@@ -2294,6 +2283,17 @@
     ^ self doRaise
 
     "Created: / 10-08-2010 / 09:50:54 / cg"
+!
+
+signal
+    "return the signal, that caused the exception.
+     Warning and notice: in ANSI, signal means: raise;
+     here and in old VW, it is the accessor to the creator signal/exception.
+
+     This has now changed to be compatible with ANSI/Squeak.
+     Please use #creator to get the creator."
+
+    self raiseSignal.
 ! !
 
 !GenericException methodsFor:'setup'!
@@ -2362,11 +2362,11 @@
 !GenericException class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/GenericException.st,v 1.150 2014-02-26 08:42:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/GenericException.st,v 1.151 2014-03-02 00:17:12 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/GenericException.st,v 1.150 2014-02-26 08:42:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/GenericException.st,v 1.151 2014-03-02 00:17:12 cg Exp $'
 ! !