checkin from browser
authorClaus Gittinger <cg@exept.de>
Sat, 01 Mar 1997 23:53:56 +0100
changeset 2433 6eeced763de2
parent 2432 5338f9b60a66
child 2434 0a84bd4173c2
checkin from browser
Exception.st
--- a/Exception.st	Sat Mar 01 17:28:32 1997 +0100
+++ b/Exception.st	Sat Mar 01 23:53:56 1997 +0100
@@ -657,8 +657,8 @@
      theSignal c ex1 activeHandlers inHandler rejected
      lastHandler h raiseReceiver|
 
-    theContext := thisContext sender.  "the raise/raiseRequest-context"
-    theContext := theContext sender.          "the signal raise context"
+    theContext := thisContext sender sender.  "the raise/raiseRequest-context"
+                                              "the signal raise context"
 
     theSignal := theContext receiver.
     theSignal isSignal ifFalse:[
@@ -836,7 +836,7 @@
     ^ block value:self.
 
     "Created: 12.5.1996 / 15:09:39 / cg"
-    "Modified: 27.1.1997 / 20:26:06 / cg"
+    "Modified: 1.3.1997 / 23:53:14 / cg"
 !
 
 raise
@@ -875,6 +875,6 @@
 !Exception class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Exception.st,v 1.50 1997-01-28 00:01:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Exception.st,v 1.51 1997-03-01 22:53:56 cg Exp $'
 ! !
 Exception initialize!