main
Daniel Barlow 2022-09-16 10:11:50 +01:00
parent b2c4972529
commit ff83e03e0c
2 changed files with 4 additions and 10 deletions

View File

@ -1,9 +1,8 @@
(local json (require :dkjson)) (local json (require :dkjson))
(local { : view } (require :fennel))
(local sms (require :sms))
(local unistd (require :posix.unistd)) (local unistd (require :posix.unistd))
(local sms (require :sms))
(fn send-sms [body] (fn send-sms [body]
(print :send-sms body) (print :send-sms body)
(sms.send "+447000123456" body) (sms.send "+447000123456" body)

View File

@ -1,13 +1,8 @@
(local server (require :server)) (local server (require :server))
(local handler (require :handler)) (local handler (require :handler))
(local sms (require :sms)) (local sms (require :sms))
(sms.send "+447000123456" "test 123") (print "Ready")
(os.exit 0)
(doto (server.new handler.handle) (doto (server.new handler.handle)
(: :listen) (: :listen)
(: :loop 60)) (: :loop))
(io.stdin:read)