--- a/MessageSend.st	Sun Sep 12 16:06:17 2010 +0200
+++ b/MessageSend.st	Tue Sep 14 16:05:26 2010 +0200
@@ -204,15 +204,19 @@
 
 value:someArgument
     "evaluate the messagesend, with someArgument instead of the original"
- 
-    ^ receiver perform:selector with:someArgument
+
+    ^ receiver perform:selector withOptionalArgument:someArgument
+
+    "Modified: / 14-09-2010 / 16:04:39 / cg"
 !
 
 value:arg1 value:arg2
     "evaluate the messagesend, with arg1 and arg2 instead of the original
      arguments"
 
-    ^ receiver perform:selector with:arg1 with:arg2
+    ^ receiver perform:selector withOptionalArgument:arg1 and:arg2
+
+    "Modified: / 14-09-2010 / 16:04:58 / cg"
 !
 
 value:arg1 value:arg2 value:arg3
@@ -265,5 +269,9 @@
 !MessageSend class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/MessageSend.st,v 1.21 2008-12-17 16:23:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/MessageSend.st,v 1.22 2010-09-14 14:05:26 cg Exp $'
+!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libbasic/MessageSend.st,v 1.22 2010-09-14 14:05:26 cg Exp $'
 ! !