--- a/JavaNativeMethod.st Tue May 07 13:06:28 2013 +0100
+++ b/JavaNativeMethod.st Tue May 07 13:31:03 2013 +0100
@@ -388,6 +388,7 @@
| m a |
m := JavaVM natives class lookupMethodFor: newStyleSel.
+ m isWrapped ifTrue:[ m := m originalMethod ].
a := m annotationsAt: #javanative:name:.
a do:[:each|
each arguments second = selector ifTrue:[
@@ -405,7 +406,7 @@
^newStyleSel
"Created: / 19-01-2013 / 22:11:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 12-02-2013 / 15:26:29 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 06-05-2013 / 22:03:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!JavaNativeMethod methodsFor:'private-compiler interface'!