From b33249a0502b3f58d1c1e56ab9db08e4f6cad712 Mon Sep 17 00:00:00 2001
From: Daniel Barlow <dan@telent.net>
Date: Fri, 26 Apr 2024 17:23:29 +0100
Subject: [PATCH] devout: add readiness notification

---
 pkgs/devout/devout.fnl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/pkgs/devout/devout.fnl b/pkgs/devout/devout.fnl
index a963136..baec6c4 100644
--- a/pkgs/devout/devout.fnl
+++ b/pkgs/devout/devout.fnl
@@ -143,6 +143,7 @@
     (loop:register
      nl
      #(do (db:add (ll.read nl)) true))
+    (ll.write 10 "ready\n")
     (while true
       (let [pollfds (pollfds-for (loop:fds))]
         (ll.poll pollfds 5000)