X-Git-Url: https://gerrit.simantics.org/r/gitweb?p=simantics%2Fplatform.git;a=blobdiff_plain;f=bundles%2Forg.simantics.document.swt.core%2Fscl%2FSWT%2FAll.scl;h=0ef41f97ca0c3e400ed5d1f3fa2c787625b06c79;hp=69383dbdbdeea03a615fdbd0a158e1be992f21f7;hb=0ae2b770234dfc3cbb18bd38f324125cf0faca07;hpb=24e2b34260f219f0d1644ca7a138894980e25b14

diff --git a/bundles/org.simantics.document.swt.core/scl/SWT/All.scl b/bundles/org.simantics.document.swt.core/scl/SWT/All.scl
index 69383dbdb..0ef41f97c 100644
--- a/bundles/org.simantics.document.swt.core/scl/SWT/All.scl
+++ b/bundles/org.simantics.document.swt.core/scl/SWT/All.scl
@@ -1,32 +1,32 @@
-import "Simantics/DB"
-import "Simantics/DB" as DB
-import "Simantics/Variables"
-import "Simantics/WorkbenchSelection"
-include "Simantics/SCL"
-include "Document/All"
-include "SWT/Types"
-
-importJava "org.simantics.document.swt.core.scl.SCL" where
-    /*eventHandler :: ((String -> Maybe String) -> <WriteGraph> ()) -> EventHandler*/
-    decodeWSES :: Maybe String -> [WorkbenchSelectionElement]
-    wseResource :: WorkbenchSelectionElement -> <ReadGraph> Resource
-
-contributionType :: Variable -> <ReadGraph> String
-contributionType var = DB.nameOf $ singleObject (resource $ uri $ variableParent var) (resource "http://www.simantics.org/SelectionView-1.2/AbstractTypedVariableTabContribution/HasType")
-
-inputVariable :: Variable -> <ReadGraph> Variable
-inputVariable var = propertyValue (variableParent var) "input"
-
-asComboList :: [Resource] -> <ReadGraph> [String]
-asComboList resources = map (\r -> DB.nameOf r) resources
-   
-importJava "org.simantics.document.swt.core.scl.SCL" where
-    propertyGetter :: Variable -> <ReadGraph> String
-
-    getURI :: Variable -> <ReadGraph> String
-
-    propertyDisplayValue :: Variable -> String -> <ReadGraph> String
-
-    propertyValueSetter :: Variable -> String -> <ReadGraph> AbstractEventHandler
-   
+import "Simantics/DB"
+import "Simantics/DB" as DB
+import "Simantics/Variables"
+import "Simantics/WorkbenchSelection"
+include "Simantics/SCL"
+include "Document/All"
+include "SWT/Types"
+
+importJava "org.simantics.document.swt.core.scl.SCL" where
+    /*eventHandler :: ((String -> Maybe String) -> <WriteGraph> ()) -> EventHandler*/
+    decodeWSES :: Maybe String -> [WorkbenchSelectionElement]
+    wseResource :: WorkbenchSelectionElement -> <ReadGraph> Resource
+
+contributionType :: Variable -> <ReadGraph> String
+contributionType var = DB.nameOf $ singleObject (resource $ uri $ variableParent var) (resource "http://www.simantics.org/SelectionView-1.2/AbstractTypedVariableTabContribution/HasType")
+
+inputVariable :: Variable -> <ReadGraph> Variable
+inputVariable var = propertyValue (variableParent var) "input"
+
+asComboList :: [Resource] -> <ReadGraph> [String]
+asComboList resources = map (\r -> DB.nameOf r) resources
+   
+importJava "org.simantics.document.swt.core.scl.SCL" where
+    propertyGetter :: Variable -> <ReadGraph> String
+
+    getURI :: Variable -> <ReadGraph> String
+
+    propertyDisplayValue :: Variable -> String -> <ReadGraph> String
+
+    propertyValueSetter :: Variable -> String -> <ReadGraph> AbstractEventHandler
+   
   
\ No newline at end of file