--- a/Signal.st	Thu May 29 12:50:36 2014 +0200
+++ b/Signal.st	Thu May 29 12:50:49 2014 +0200
@@ -193,7 +193,9 @@
 !Signal methodsFor:'accessing'!
 
 creator
-    "return the creator of the exception (for exception protocol compatibilty)"
+    "return the creator of the exception (for exception protocol compatibilty).
+     For class based exceptions, that is the exception class;
+     for signals, that is the signal itself."
 
     ^ self
 !
@@ -986,10 +988,10 @@
 !Signal class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Signal.st,v 1.113 2013-06-05 11:25:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Signal.st,v 1.114 2014-05-29 10:50:49 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Signal.st,v 1.113 2013-06-05 11:25:09 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Signal.st,v 1.114 2014-05-29 10:50:49 cg Exp $'
 ! !