1 files changed, 3 insertions(+), 0 deletions(-)

M server.lisp

@@ 4,7 4,10 @@
   "Given a query return the titles of wikipedia articles until
 philosophy in json format."
   (setf (hunchentoot:content-type*) "application/json")
+  (setf (hunchentoot:header-out "Access-Control-Allow-Origin") "*")
   (cl-json:encode-json-to-string (wikisophy.crawler:path-to-philosophy query)))
 
+
+
 (defvar *server* (make-instance 'hunchentoot:easy-acceptor :port 4242))
 (hunchentoot:start *server*)