match (syncRead (\x -> possibleSubstructureEditor element)) with
Nothing -> ()
Just (configuration,editor) -> openEditor editor configuration
-
\ No newline at end of file
+
+importJava "org.simantics.modeling.MigrateModel" where
+ "changeAllComponentTypes model oldComponentType newComponentType"
+ changeAllComponentTypes :: Resource -> Resource -> Resource -> <WriteGraph> ()