Added enabled flag for UpdateOp

[simantics/interop.git] / org.simantics.interop.update / scl / Interop / Update.scl

diff --git a/org.simantics.interop.update/scl/Interop/Update.scl b/org.simantics.interop.update/scl/Interop/Update.scl
index e2ee353fb7de1b589081b187e8e1d5f7d033d012..2c9124874b66ee2f746d3d9f6a49f164fbb90e56 100644 (file)
--- a/org.simantics.interop.update/scl/Interop/Update.scl
+++ b/org.simantics.interop.update/scl/Interop/Update.scl
@@ -119,9 +119,15 @@ importJava "org.simantics.interop.update.model.PropertyChange" where
   @JavaName getSecondSubject
   getSecondSubject :: PropertyChange -> <Proc> Resource
   
-  @JavaName isVisible
+  @JavaName isVisible  
   pcVisible :: PropertyChange -> <Proc> Boolean
   
+  @JavaName enabled  
+  pcEnabled :: PropertyChange -> <Proc> Boolean
+  
+  @JavaName setEnabled
+  pcEnable :: PropertyChange -> Boolean -> <Proc> ()
+  
 
 importJava "org.simantics.interop.update.model.UpdateNode" where
   data UpdateNode
@@ -178,6 +184,9 @@ importJava "org.simantics.interop.update.model.UpdateOp" where
   @JavaName isChange
   opIsChange :: UpdateOp -> <Proc> Boolean
   
+  @JavaName enabled
+  opEnabled :: UpdateOp -> <Proc> Boolean
+  
   @JavaName getResource
   getOpResource :: UpdateOp -> <Proc> Maybe Resource