--- a/WrappedMethod.st	Sun Jul 29 13:05:27 2012 +0200
+++ b/WrappedMethod.st	Tue Jul 31 14:16:21 2012 +0200
@@ -50,6 +50,12 @@
 "
 ! !
 
+!WrappedMethod class methodsFor:'others'!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libbasic3/WrappedMethod.st,v 1.32 2012-07-31 12:16:21 vrany Exp $'
+! !
+
 !WrappedMethod class methodsFor:'registration'!
 
 allInstancesDo:aBlock
@@ -210,6 +216,13 @@
 
 !WrappedMethod methodsFor:'misc'!
 
+makeLocalStringSource
+
+    self originalMethod makeLocalStringSource
+
+    "Created: / 11-02-2012 / 19:09:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 register
     self class register:self
 
@@ -331,6 +344,6 @@
 
 !WrappedMethod class methodsFor:'documentation'!
 
-version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/WrappedMethod.st,v 1.31 2011-12-19 08:38:46 vrany Exp $'
+version_SVN
+    ^ '§Id: WrappedMethod.st 1909 2012-03-31 00:14:49Z vranyj1 §'
 ! !