Hmm. Is that in 4.9? Because in 5.0 the code is different indeed.Doru_______________________________________________On Sat, Dec 7, 2013 at 3:39 PM, Stéphane Ducasse <stephane.ducasse@inria.fr> wrote:
Hi
just to let you know that trying to add an annotation in moosefinder does not work anymore I get
mooseFinderMetanoolIn: composite
<moosePresentationOrder: 10>
composite magritte
title: 'Meta editor';
titleIcon: MooseIcons mooseEditor;
display: [:anObject | anObject mooseInterestingEntity ];
act: [:magritte |
| result annotationDescription |
annotationDescription := MTLAnnotationDescription new.
result := annotationDescription asMorph addButtons addWindow callInWorld.
^^^^^^^^^^^^^
DNU addButtons
(result notNil) ifTrue: [
magritte entity mooseInterestingEntity mooseDescription attributes add: annotationDescription.
magritte update ] ]
icon: GLMUIThemeExtraIcons glamorousAdd entitled: 'Add annotation';
description: [ :anObject | anObject mooseDescription asMagritteDescriptionWithAnnotations ]
_______________________________________________
Moose-dev mailing list
Moose-dev@iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev
--"Every thing has its own flow"
Moose-dev mailing list
Moose-dev@iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev