--- a/MethodTrapChangeNotificationParameter.st Fri Jun 21 00:51:56 2013 +0200
+++ b/MethodTrapChangeNotificationParameter.st Fri Jun 21 01:22:28 2013 +0200
@@ -15,6 +15,10 @@
self at:2 put:changeSelectorArg.
!
+changeMethod
+ ^ nil
+!
+
changeSelector
^ self at:2
! !
@@ -22,5 +26,6 @@
!MethodTrapChangeNotificationParameter class methodsFor:'documentation'!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic3/MethodTrapChangeNotificationParameter.st,v 1.1 2010-04-19 13:27:41 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/MethodTrapChangeNotificationParameter.st,v 1.2 2013-06-20 23:22:28 cg Exp $'
! !
+