This website works better with JavaScript.
Почетна
Преглед
lain.church
Помоћ
Регистрација
Пријавите Се
overflow
/
mariobot
Прати
1
Волим
0
Креирај огранак
0
Код
Дискусије
0
Захтеви за спајање
0
Издања
0
Вики
Activity
Преглед изворни кода
print status for safebooru request to stdout
master
Brent Gordon
пре 4 година
родитељ
6a5eee6390
комит
e5ecd19676
1 измењених фајлова
са
1 додато
и
0 уклоњено
Подељен поглед
Diff Options
Show Stats
Download Patch File
Download Diff File
+1
-0
bot.rkt
+ 1
- 0
bot.rkt
Прегледај датотеку
@@ -27,6 +27,7 @@
(define (search-safebooru)
(define-values (status header response)(http-sendrecv safebooru (string-append "/posts.json?limit=" limit "&page=" page "&tags="tags ) #:ssl? #t))
(displayln status)
(define posts (read-json response))
(list-ref posts pos))
Write
Preview
Loading…
Откажи
Сачувај