(in-package :site) (defconstant +site-title+ "civilbrights") (defconstant +data-directory+ #p"/home/mobright/db/") (defconstant +public-directory+ #p"/home/mobright/public_html/") (defconstant +static-file-directory+ (merge-pathnames "static/" +public-directory+)) (defconstant +sendmail+ "| /usr/sbin/sendmail -t") (defconstant +from+ (format nil "~a " +site-title+)) (defconstant +youtube-developer-id+ "TN91EOGVSj0") (defconstant +google-maps-key+ "ABQIAAAAoPAS2vzWe8cS6HPoC4o3fxQmhT3tBBpIUS4uXjWppaS9dmew1BTHO_0_hd8NlZ0iYMB9knckiHTMdA") (defconstant +package+ (find-package :kira)) (defvar *base-uri* "http://civilbrights.net/") (defconstant +administrators+ '("dmullen")) (defun challenge-question () "Title of Daniel C. Dennett's book about religion") (defun challenge-answer () "spell") (defun challenge-hint () "/books/Breaking+the+Spell")