equal
deleted
inserted
replaced
3374 |
3374 |
3375 self hasResource ifFalse:[^ nil]. |
3375 self hasResource ifFalse:[^ nil]. |
3376 annotations isNil ifTrue:[^ self parseResources]. |
3376 annotations isNil ifTrue:[^ self parseResources]. |
3377 |
3377 |
3378 resources := IdentityDictionary new. |
3378 resources := IdentityDictionary new. |
3379 self annotationsAt: #resource: orAt: #resource:value: do:[:annot| |
3379 self annotationsAt: #resource: orAt: #resource:values: do:[:annot| |
3380 resources at: annot type put: annot value ? true |
3380 resources at: annot type put: annot value ? true |
3381 ]. |
3381 ]. |
3382 ^ resources |
3382 ^ resources |
3383 |
3383 |
3384 "Modified: / 16-07-2010 / 11:49:27 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
3384 "Modified: / 16-07-2010 / 11:49:27 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
3385 "Modified: / 18-11-2011 / 14:48:41 / cg" |
3385 "Modified: / 18-11-2011 / 14:48:41 / cg" |