--- a/MethodChange.st Tue Jul 31 14:23:08 2012 +0200
+++ b/MethodChange.st Tue Jul 31 14:24:31 2012 +0200
@@ -73,6 +73,12 @@
^ self basicNew className:clsName selector:sel source:src category:cat
! !
+!MethodChange class methodsFor:'others'!
+
+version_CVS
+ ^ '$Header: /cvs/stx/stx/libbasic3/MethodChange.st,v 1.66 2012-07-31 12:24:31 vrany Exp $'
+! !
+
!MethodChange methodsFor:'accessing'!
category
@@ -206,6 +212,13 @@
^ previousVersion source
!
+privacy
+
+ ^privacy ? #public
+
+ "Created: / 19-03-2012 / 18:16:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
selector
^ selector
@@ -445,10 +458,6 @@
!MethodChange class methodsFor:'documentation'!
-version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic3/MethodChange.st,v 1.65 2012-07-25 23:22:03 cg Exp $'
-!
-
version_SVN
- ^ '§ Id: MethodChange.st 1867 2011-06-08 21:57:08Z vranyj1 §'
+ ^ '§Id: MethodChange.st 1940 2012-07-26 15:09:40Z vranyj1 §'
! !