X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;f=bundles%2Forg.simantics.document.base.ontology%2Fgraph%2FComponents.pgraph;h=df5665ea463bf41855b789f46e87e60f4fce37b5;hb=378f6f82ce88c8ba2ba9f7345cb25679b508bae5;hp=8c03f41c5e9935fd4d47c485460040e102ffd999;hpb=8959bb33806d2252cdf09e42386afd242919630a;p=simantics%2Fplatform.git

diff --git a/bundles/org.simantics.document.base.ontology/graph/Components.pgraph b/bundles/org.simantics.document.base.ontology/graph/Components.pgraph
index 8c03f41c5..df5665ea4 100644
--- a/bundles/org.simantics.document.base.ontology/graph/Components.pgraph
+++ b/bundles/org.simantics.document.base.ontology/graph/Components.pgraph
@@ -63,9 +63,9 @@ COMPONENTS.Component <T STR.Component
     @sclAttribute PROPERTIES.commands "commandList self" "[Command]"
 
 COMPONENTS.PrimitiveComponent <T COMPONENTS.Component
-    @L0.assert PROPERTIES.primitiveProperties
-      _ : L0.Value
-        L0.domainProperties FUNCTIONS.primitiveProperties
+    @L0.sclAssertion PROPERTIES.primitiveProperties "primitiveProperties" "DocumentProperties"
+//      _ : L0.Value
+//        L0.domainProperties FUNCTIONS.primitiveProperties
 
 COMPONENTS.ParentlessComponent <T COMPONENTS.PrimitiveComponent /* Component without a parent, e.g. Root, DialogBox */
 
@@ -91,7 +91,7 @@ DOC.commandEvent : L0.Template
     @template %instance %expression %valueType
         %instance : COMPONENTS.CommandEvent
             PROPERTIES.SCLFunction _ : %valueType
-                L0.HasValueType "EventHandler"
+                L0.HasValueType "AbstractEventHandler"
                 L0.SCLValue.expression %expression
 
 COMPONENTS.DefVar <T COMPONENTS.ParentlessComponent