AuditLogging improvements for easier unit testing

[simantics/platform.git] / bundles / org.simantics.auditlogging / scl / Simantics / AuditLogging / Client.scl

diff --git a/bundles/org.simantics.auditlogging/scl/Simantics/AuditLogging/Client.scl b/bundles/org.simantics.auditlogging/scl/Simantics/AuditLogging/Client.scl
index f60474aa401de26dca0483fdfef5cc2eef96ac1e..4c8c9be6832adbef1411eed61f5413ac0a7304e0 100644 (file)
--- a/bundles/org.simantics.auditlogging/scl/Simantics/AuditLogging/Client.scl
+++ b/bundles/org.simantics.auditlogging/scl/Simantics/AuditLogging/Client.scl
@@ -1,6 +1,13 @@
 import "Map" as Map
 
 importJava "org.simantics.audit.client.AuditLoggingClient" where
+
+    @JavaName fromProps
+    auditLoggingClient :: Map.T a a -> <Proc> b 
+
+    @JavaName getUUID
+    getAuditLoggingUUID :: <Proc> String
+
     @JavaName sendLog
     sendLogM :: Map.T String a -> <Proc> ()
     sendLog :: [a] -> <Proc> ()