added: #annotations
authorvrany
Sun, 04 Dec 2011 12:35:42 +0100
changeset 2635 b99f9a1ecef4
parent 2634 865f10de3c93
child 2636 e64a277189eb
added: #annotations
WrappedMethod.st
--- a/WrappedMethod.st	Thu Dec 01 21:02:44 2011 +0100
+++ b/WrappedMethod.st	Sun Dec 04 12:35:42 2011 +0100
@@ -79,6 +79,14 @@
 
 !WrappedMethod methodsFor:'accessing'!
 
+annotations
+    "return the wrapped methods annotations"
+
+    ^ self originalMethod annotations
+
+    "Created: / 04-12-2011 / 11:22:13 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 basicLiterals
     "return my literals"
 
@@ -301,5 +309,5 @@
 !WrappedMethod class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/WrappedMethod.st,v 1.29 2011-07-01 08:52:35 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/WrappedMethod.st,v 1.30 2011-12-04 11:35:42 vrany Exp $'
 ! !