The main directory for all candle work to be done in. When the server is running
in local mode, this is also the place that builds are built in")
+(defvar *environment* :local
+ "*ENVIRONMENT*
+
+VALUE TYPE:
+
+ A keyword
+
+INITIAL VALUE:
+
+ :LOCAL
+
+DESCRIPTION:
+
+ The environment that candle is currently running. Useful to do switching in tests
+ or in the .candle file to do extra boot up processing.")
+
(define-condition candle-error (error)
((reason :initarg :reason :reader candle-error-reason))
(:documentation
; this will get set to nil but we keep them around for historical reference
(lame-db:defdbstruct branch name in-git (project :join project) (job :join job))
+(setf (documentation 'project-name 'function)
+ "PROJECT-NAME PROJECT => NAME
+
+ARGUMENTS AND VALUES:
+
+ PROJECT: the project
+ NAME: a string, the name of the job
+
+DESCRIPTION:
+
+ Returns the name of the project in question.")
+
(defun project-dir (project)
"PROJECT-DIR PROJECT => DIR