X-Git-Url: https://gerrit.simantics.org/r/gitweb?p=simantics%2Fplatform.git;a=blobdiff_plain;f=bundles%2Forg.simantics.scl.data%2Fscl%2FData%2FXML.scl;h=7f836aaa43b5abcb2da0f7428d461432b1e05ee2;hp=3f78b5ab530b5276b8ba78ce6880a7884deb0fce;hb=a5a1c8cd3203e8e5743073060b2f2ea430cef86c;hpb=748869ab2b45ceb34b9df4c03fbc2b93f3a26f1d diff --git a/bundles/org.simantics.scl.data/scl/Data/XML.scl b/bundles/org.simantics.scl.data/scl/Data/XML.scl index 3f78b5ab5..7f836aaa4 100644 --- a/bundles/org.simantics.scl.data/scl/Data/XML.scl +++ b/bundles/org.simantics.scl.data/scl/Data/XML.scl @@ -118,5 +118,9 @@ importJava "org.simantics.scl.data.xml.JDomHelper" where parseFileWithSchemaFile :: String -> String -> Document //parseFileWithSchemaURL :: URL -> String -> Document + addCDATA :: Element -> String -> () + getCDATAs :: Element -> [String] + + sortChildrenBy :: Ord a => (Element -> a) -> Element -> () sortChildrenBy f el = sortChildrenWith (\x y -> compare (f x) (f y)) el \ No newline at end of file