class: WrappedMethod
authorClaus Gittinger <cg@exept.de>
Wed, 05 Mar 2014 17:32:56 +0100
changeset 3516 f9a7b080ae60
parent 3515 203e27373562
child 3517 b94e2737c469
class: WrappedMethod comment/format in: #annotateWith:
WrappedMethod.st
--- a/WrappedMethod.st	Tue Mar 04 16:00:08 2014 +0100
+++ b/WrappedMethod.st	Wed Mar 05 17:32:56 2014 +0100
@@ -53,7 +53,7 @@
 !WrappedMethod class methodsFor:'others'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/WrappedMethod.st,v 1.39 2014-02-24 23:22:28 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/WrappedMethod.st,v 1.40 2014-03-05 16:32:56 cg Exp $'
 ! !
 
 !WrappedMethod class methodsFor:'registration'!
@@ -252,6 +252,8 @@
 !WrappedMethod methodsFor:'accessing-annotations'!
 
 annotateWith: annotation
+    "add a (hidden) annotation"
+
     ^ self originalMethod annotateWith: annotation
 
     "Created: / 24-02-2014 / 22:47:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
@@ -488,6 +490,6 @@
 !WrappedMethod class methodsFor:'documentation'!
 
 version_SVN
-    ^ '$Id: WrappedMethod.st,v 1.39 2014-02-24 23:22:28 vrany Exp $'
+    ^ '$Id: WrappedMethod.st,v 1.40 2014-03-05 16:32:56 cg Exp $'
 ! !