X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;ds=sidebyside;f=bundles%2Forg.simantics.modeling.ontology%2Fgraph%2FModeling.pgraph;h=d026eb2b5a3982f6bf561f49056fe94268d165ad;hb=06718abb2b3cc780748553811c4857c165499809;hp=1bd459db5b94c296171b02414bfdda76aba4f170;hpb=969bd23cab98a79ca9101af33334000879fb60c5;p=simantics%2Fplatform.git

diff --git a/bundles/org.simantics.modeling.ontology/graph/Modeling.pgraph b/bundles/org.simantics.modeling.ontology/graph/Modeling.pgraph
index 1bd459db5..d026eb2b5 100644
--- a/bundles/org.simantics.modeling.ontology/graph/Modeling.pgraph
+++ b/bundles/org.simantics.modeling.ontology/graph/Modeling.pgraph
@@ -121,7 +121,7 @@ MOD.ConnectionMappingSpecification <T L0.Entity
     // MOD.DiagramConnectionRelationToConnectionRelationC
     // MOD.DiagramConnectionRelationToComponentType
 MOD.ConnectionRelationToConnectionMappingSpecification <R L0.IsRelatedTo
-    L0.HasDomain DIA.Connector
+    L0.HasDomain STR.ConnectionRelation
     L0.HasRange MOD.ConnectionMappingSpecification
 MOD.NeedsConnectionMappingSpecification <R L0.IsRelatedTo : L0.Tag : L0.FunctionalRelation
     L0.HasDescription "Tells a connection relation that a diagram connection using it will require a DIA.Connector that has MOD.HasConnectionMappingSpecification statement attached to it if the used connection type has a MOD.ConnectionTypeToConnectionMappingSpecification specified. It guides connection creation."
@@ -298,11 +298,12 @@ MOD.ModelBrowser <T VIEW.Explorer
 
 MOD.PlainModelBrowser : MOD.ModelBrowser
 
+MOD.Functions.sclValue : L0.ExternalValue
+
 MOD.MonitorValue <T STR.MonitorValue
   @L0.assert L0.valueAccessor
     MOD.Functions.monitorValueAccessor : L0.ExternalValue
-  @L0.assert L0.ConvertsToValueWith
-    MOD.Functions.sclValue : L0.ExternalValue
+  @L0.assert L0.ConvertsToValueWith MOD.Functions.sclValue
   @L0.assert L0.SCLValue.environment
     _ : L0.SCLValue.Environment
       L0.SCLValue.Environment.moduleName "Simantics/All"
@@ -311,8 +312,7 @@ MOD.MonitorValue <T STR.MonitorValue
     MOD.Functions.monitorReadOnly : L0.Function
 
 MOD.SCLValue <T L0.SCLValue
-  @L0.assert L0.ConvertsToValueWith
-    MOD.Functions.sclValue : L0.ExternalValue
+  @L0.assert L0.ConvertsToValueWith MOD.Functions.sclValue
   /*@L0.assert L0.SCLValue.environment
     _ : L0.SCLValue.Environment
       L0.SCLValue.Environment.moduleName "Simantics/All"
@@ -501,5 +501,9 @@ MOD.editorContribution : L0.Template
                 L0.SCLValue.expression %canHandle
                 L0.HasValueType "Resource -> <ReadGraph> Boolean"
                 
+MOD.SVGTabContribution : SEL.SCLTabContribution
+  @MOD.scl SEL.SCLTabContribution.instantiate
+    "svgTabContribution"
+    "() -> <Proc> TabContribution"
 
       
\ No newline at end of file