diff --git a/src/server/main.lisp b/src/server/main.lisp
index a115efd..a227c07 100644
--- a/src/server/main.lisp
+++ b/src/server/main.lisp
@@ -66,7 +66,7 @@
                          ;; This gets rid of beginning and ending NIL values
                          (if name (if (string/= name "image") (progn
                                                                 (format t "~&~A: ~A" name content)
-                                                                (setq form-list (destructuring-bind (name) (list content) (list :name content))))) nil)
+                                                                (setq form-list (list (cons name content))))) nil)
                          (if (string= name "image") (setq content (butlast content)))
 
                          (if (string= "image" name)