glenn
/
asteroid
mirror of https://github.com/glenneth1/asteroid.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

move main closer to my config branch in preperation for moving in totality.

This commit is contained in:
Brian O'Reilly 2025-11-11 11:16:32 -05:00
parent 7ed4515139
commit 5f91a81545
2 changed files with 23 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
asteroid.asd
View File

@ -11,24 +11,27 @@
:class "radiance:virtual-module"
:depends-on (:slynk
:lparallel
:radiance
:i-log4cl
:r-clip
:r-simple-rate
:r-simple-profile
:lass
:cl-json
:alexandria
:cl-json
:radiance
:lass
:local-time
:taglib
:r-data-model
:ironclad
:babel
:cl-fad
:bordeaux-threads
:drakma
;; radiance interfaces
:i-log4cl
:i-postmodern
:r-clip
:r-data-model
:r-simple-profile
:r-simple-rate
(:interface :auth)
(:interface :database)
(:interface :relational-database)
(:interface :user))
:pathname "./"
:components ((:file "app-utils")

23
build-asteroid.lisp
View File

@ -22,20 +22,20 @@
;; Load RADIANCE first, then handle environment
(ql:quickload :radiance)
(defmethod radiance:environment-directory (environment (kind (eql :configuration)))
(ab:path (make-pathname :directory `(:relative "config" ,environment))))
;; (defmethod radiance:environment-directory (environment (kind (eql :configuration)))
;; (ab:path (make-pathname :directory `(:relative "config" ,environment))))
(defmethod radiance:environment-directory (environment (kind (eql :cache)))
(ab:path (make-pathname :directory `(:relative "cache" ,environment))))
;; (defmethod radiance:environment-directory (environment (kind (eql :cache)))
;; (ab:path (make-pathname :directory `(:relative "cache" ,environment))))
(defmethod radiance:environment-directory (environment (kind (eql :data)))
(ab:path (make-pathname :directory `(:relative "data" ,environment))))
;; (defmethod radiance:environment-directory (environment (kind (eql :data)))
;; (ab:path (make-pathname :directory `(:relative "data" ,environment))))
(defmethod radiance:environment-directory (environment (kind (eql :template)))
(ab:path (make-pathname :directory `(:relative "override" ,environment "template"))))
;; (defmethod radiance:environment-directory (environment (kind (eql :template)))
;; (ab:path (make-pathname :directory `(:relative "override" ,environment "template"))))
(defmethod radiance:environment-directory (environment (kind (eql :static)))
(ab:path (make-pathname :directory `(:relative "override" ,environment "static"))))
;; (defmethod radiance:environment-directory (environment (kind (eql :static)))
;; (ab:path (make-pathname :directory `(:relative "override" ,environment "static"))))
;; Ensure RADIANCE environment is set before loading
(unless (radiance:environment)
@ -63,4 +63,5 @@
(sb-ext:save-lisp-and-die "asteroid"
:toplevel #'main
:executable t
:compression 22)
:compression 12)