X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;f=bundles%2Forg.simantics.diagram%2Fscl%2FSimantics%2FDiagram%2FSVGNode.scl;h=25aa798b1bac82d1b126879245cd84f43f5a824d;hb=HEAD;hp=9c5d43c4f37028b1cc7e160915eb5a76b3ce4d4b;hpb=e1c5d8d7c5589cfa4a254e167f4d9f0e66df6bf7;p=simantics%2Fplatform.git diff --git a/bundles/org.simantics.diagram/scl/Simantics/Diagram/SVGNode.scl b/bundles/org.simantics.diagram/scl/Simantics/Diagram/SVGNode.scl index 9c5d43c4f..25aa798b1 100644 --- a/bundles/org.simantics.diagram/scl/Simantics/Diagram/SVGNode.scl +++ b/bundles/org.simantics.diagram/scl/Simantics/Diagram/SVGNode.scl @@ -4,6 +4,7 @@ type BoundingBox = (Double,Double,Double,Double) importJava "org.simantics.diagram.elements.SVGMeasurementContext" where data SVGMeasurementContext getBoundingBox :: SVGMeasurementContext -> String -> Maybe BoundingBox + modifyText :: SVGMeasurementContext -> String -> String -> () getBoundingBoxX :: BoundingBox -> Double getBoundingBoxX (x,_,_,_) = x