Not setting post_nrs correctly

5 years ago · 497b87c9c3
parent 08254eda06
commit 497b87c9c3
1 changed files with 2 additions and 1 deletions
--- a/src/main.lisp
+++ b/src/main.lisp
@ -41,7 +41,8 @@

 (henh:handle :post (api-get :uri "/api/get") @json
    (post_nrs board version)
-  (if (get-posts-p (cl-ppcre:split "," post_nrs) board)
+  (setf post_nrs (cl-ppcre:split "," post_nrs))
+  (if (get-posts-p post_nrs board)
      (format nil "~a~%" (get-posts post_nrs board))
      (t (format nil "{[\"~a\"]}~%" "bad"))))