--- a/ExecutableFunction.st	Sun Mar 02 21:47:00 2003 +0100
+++ b/ExecutableFunction.st	Sun Mar 02 21:49:53 2003 +0100
@@ -74,7 +74,7 @@
     "create signals raised by various errors"
 
     InvalidCodeSignal isNil ifTrue:[
-        ExecutionErrorSignal := ErrorSignal newSignalMayProceed:true.
+        ExecutionErrorSignal := Error newSignalMayProceed:true.
         ExecutionErrorSignal nameClass:self message:#executionErrorSignal.
         ExecutionErrorSignal notifierString:'execution error'.
 
@@ -433,6 +433,7 @@
 !ExecutableFunction class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ExecutableFunction.st,v 1.46 2001-08-31 15:19:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ExecutableFunction.st,v 1.47 2003-03-02 20:49:53 stefan Exp $'
 ! !
+
 ExecutableFunction initialize!