devout: add incoming netlink messages to database

This commit is contained in:
Daniel Barlow 2024-04-24 18:32:27 +01:00
parent b4ba3eea21
commit 6bee2f67ac

View file

@ -138,7 +138,7 @@
true))) true)))
(loop:register (loop:register
nl nl
#(do (print :netlink (ll.read nl)) true)) #(do (db:add (ll.read nl)) true))
(while true (while true
(let [pollfds (pollfds-for (loop:fds))] (let [pollfds (pollfds-for (loop:fds))]
(ll.poll pollfds 5000) (ll.poll pollfds 5000)