|
|
@ -15,7 +15,7 @@
|
|
|
|
do (setf (gethash chat *chats*) t)))
|
|
|
|
do (setf (gethash chat *chats*) t)))
|
|
|
|
|
|
|
|
|
|
|
|
(toot:handle (loligram :get (str "/loli/" (config-item :loligram-url))
|
|
|
|
(toot:handle (loligram :get (str "/loli/" (config-item :loligram-url))
|
|
|
|
:accessor 'lolisp
|
|
|
|
:acceptor 'lolisp
|
|
|
|
:content-type toot:@plain)
|
|
|
|
:content-type toot:@plain)
|
|
|
|
()
|
|
|
|
()
|
|
|
|
(when (null (tbnl:raw-post-data))
|
|
|
|
(when (null (tbnl:raw-post-data))
|
|
|
|