pusk/lib/json.ml

28 lines
345 B
OCaml

open Utils
let connection_payload =
{|
{
"capabilities": {
"alwaysMatch": {
"moz:firefoxOptions": {
"args": ["-headless"]
}
}
}
}
|}
;;
let navigate_payload url = fmt {|
{
"url": "%s"
}
|} url
let execute_payload src = fmt {|
{
"script": "%s",
"args": []
}
|} src