diff --git a/server/api/api.lisp b/server/api/api.lisp index 476f3f9..6d91f57 100644 --- a/server/api/api.lisp +++ b/server/api/api.lisp @@ -51,12 +51,6 @@ (let* ((dir (getf data :direction)) (game-id (getf data :game-id)) (game (get-game gm game-id))) - (cond - ((equal dir "up") (setf dir :up)) - ((equal dir "down") (setf dir :down)) - ((equal dir "left") (setf dir :left)) - ((equal dir "right") (setf dir :right)) - (t (setf dir nil))) (if dir (refresh game :dir dir) (refresh game))