near/wtf.nein.seizethemeans
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

With gravitas

Browse source
This commit is contained in:
heyarne 2022-08-30 18:59:18 +02:00
commit 1559578ef9
1 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

6
main.scm
View file

@ -2,7 +2,9 @@
(chicken io) (chicken io)
(chicken process-context) (chicken process-context)
(chicken random) (chicken random)
(chicken format)) (chicken format)
http-client
utf8)
(define *api-url* (get-environment-variable "MASTODON_API_URL")) (define *api-url* (get-environment-variable "MASTODON_API_URL"))
(define *access-token* (get-environment-variable "MASTODON_ACCESS_TOKEN")) (define *access-token* (get-environment-variable "MASTODON_ACCESS_TOKEN"))
@ -37,4 +39,4 @@
(line (file-line-at file n))) (line (file-line-at file n)))
(display "Seize the means of ") (display "Seize the means of ")
(display line) (display line)
(display "\n")) (display "!\n"))