Update ARCitect-Swate communication to prepare for future features.

nfdi4plants · Oct 16, 2024 · c5c740e · c5c740e
1 parent b7da9fd
commit c5c740e
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 2 deletions.
diff --git a/src/Client/ARCitect/Interop.fs b/src/Client/ARCitect/Interop.fs
@@ -1,4 +1,4 @@
-module ARCitect.Interop
+module ARCitect.Interop
 
 open Fable.Core.JsInterop
 open Model.ARCitect
@@ -33,7 +33,7 @@ let inline runApiFromName (apiHandler: 'E) (apiName: string) (data: 'A) =
 let inline postMessageToARCitect (msg: 'A, data) =
     let methodName = getUnionCaseName msg
     let createContent (data) = {|swate = true; api = methodName; data = data|}
-    Browser.Dom.window.top.postMessage(createContent data, "*")
+    Browser.Dom.window.parent.postMessage(createContent data, "*")
 
 /// <summary>
 /// Returns a function to remove the event listener

diff --git a/src/Client/Client.fs b/src/Client/Client.fs
@@ -7,6 +7,7 @@ open Messages
 open Model
 open Update
 open Fable.Core.JsInterop
+
 importSideEffects "./style.scss"
 importSideEffects "./tailwindstyle.scss"