add ContentUtil

This commit is contained in:
2025-02-03 14:26:51 -06:00
parent c71a4e5306
commit 3f22c1f344
3 changed files with 3 additions and 3 deletions

View File

@@ -0,0 +1,2 @@
(function sendMessage [:String type :Array<Dynamic> data]
(API.browser.runtime.sendMessage (objectWith type data)))

View File

@@ -2,9 +2,6 @@
(import kiss_firefox.Message)
(import kiss_firefox.API)
(function sendMessage [:String type :Array<Dynamic> data]
(API.browser.runtime.sendMessage (objectWith type data)))
(collectBlocks onMessageCase)
(defMacro onMessage [type dataList &body body]

View File

@@ -1,5 +1,6 @@
(defMacroVar mainKissFile kissFile)
(loadFrom "kiss-firefox" "src/kiss_firefox/Util.kiss")
(loadFrom "kiss-firefox" "src/kiss_firefox/ContentUtil.kiss")
(set js.Lib.global.document.body.style.border "5px solid red")
(sendMessage "exampleMessage" [3 4])