Hello All,
I am new to Lisp and I have been playing around with Hunchentoot. I don't seem to be able to get dispatch to work. I've tried several things, but to no avail. Should the following code work or have I missed something?
(defparameter *httpsd* (hunchentoot:start (make-instance 'hunchentoot:ssl-acceptor :port 4443 :ssl-certificate-file #p"/build/hunchentoot/server.crt" :ssl-privatekey-file #p"/build/hunchentoot/server.key" :document-root #p"/build/")))
(defun upload-message () (princ "Upload"))
(push (hunchentoot:create-prefix-dispatcher "/upload" 'upload-message) hunchentoot:*dispatch-table*)
A pointer in the right direction would be much appreciated.
Thanks, Gerry