(defparameter *server* (make-instance 'easy-acceptor
				    :document-root *directory*
				    :port 4242 :name 'server
				    :error-template-directory *error-directory*))
(defparameter *error-directory* (merge-pathnames
				 (make-pathname :directory '(:relative "errors"))
				 *directory*))
					       ;;#P"/home/josh/documents/website/mine/site/errors/"