loic/remote-snake
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Debug serveré

Browse source
This commit is contained in:
Loic Guegan 2019-05-11 15:27:04 +02:00
parent 39cf5947d8
commit 59f42680ef
4 changed files with 9 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

6
server/api/api.lisp
View file

@ -38,8 +38,6 @@
p-request)))
(defmethod handle-new-game ((api api) data)
(with-slots (gm) api
(let* ((game-id (create-game gm)))
@ -80,7 +78,9 @@
:element-type 'character
:adjustable t
:fill-pointer 0)))
(format reason "~a~%" condition :escape nil)
(if (typep condition 'jonathan.error:<jonathan-error>)
(format reason "{\"type\":\"error\",\"message\":\"Failed to parse JSON\"}~%" condition :escape nil)
(format reason "{\"type\":\"error\",\"message\":\"~a\"}~%" condition :escape nil))
reason))))