--- a/Method.st Wed Oct 05 19:02:20 2016 +0200
+++ b/Method.st Wed Oct 05 21:07:45 2016 +0200
@@ -1058,7 +1058,6 @@
"Modified (format): / 18-11-2011 / 14:47:06 / cg"
! !
-
!Method methodsFor:'accessing-visibility'!
isIgnored
@@ -2042,21 +2041,21 @@
annotationOrArray := annotation := annotations at: index.
annotationOrArray isArray ifTrue:[
- args := annotationOrArray size == 2
- ifTrue:[annotationOrArray second]
- ifFalse:[#()].
- args isArray ifFalse:[args := Array with: args].
- annotation := Annotation
- method:self
- key: annotationOrArray first
- arguments: args.
- annotation isUnknown ifFalse:[
- annotations isImmutable ifTrue:[
- annotations := annotations asArray
- ].
- annotations at: index put: annotation.
+ args := annotationOrArray size == 2
+ ifTrue:[annotationOrArray second]
+ ifFalse:[#()].
+ args isArray ifFalse:[args := Array with: args].
+ annotation := Annotation
+ method:self
+ key: annotationOrArray first
+ arguments: args.
+ annotation isUnknown ifFalse:[
+ annotations isImmutable ifTrue:[
+ annotations := annotations asMutableCollection
+ ].
+ annotations at: index put: annotation.
"/ annotation annotatesMethod: self
- ].
+ ].
].
^annotation
@@ -3729,7 +3728,6 @@
"Created: / 23-07-2012 / 11:16:36 / cg"
! !
-
!Method methodsFor:'source management'!
revisionInfo