small moves, ellie. small moves.
This commit is contained in:
parent
4c99ded7f0
commit
85881b8fb6
|
|
@ -30,6 +30,20 @@
|
|||
(active :integer)
|
||||
(created-date :integer)
|
||||
(last-login :integer))))
|
||||
|
||||
(format t "Database collections initialized~%"))
|
||||
|
||||
(unless (db:collection-exists-p "playlist_tracks")
|
||||
(db:create "playlist_tracks" '((track_id :integer)
|
||||
(position :ingeger)
|
||||
(added_date :timestamp))))
|
||||
|
||||
;; TODO: the radiance db interface is too basic to contain anything
|
||||
;; but strings, integers, booleans, and maybe timestamps... we will
|
||||
;; need to rethink this. currently track/playlist relationships are
|
||||
;; defined in the SQL file 'init-db.sql' referenced in the docker
|
||||
;; config for postgresql, but our lisp code doesn't leverage it.
|
||||
|
||||
;; (unless (db:collection-exists-p "sessions")
|
||||
;; (db:create "sessions" '(())))
|
||||
|
||||
(l:info "~2&Database collections initialized~%"))
|
||||
|
||||
|
|
|
|||
|
|
@ -1,20 +1,20 @@
|
|||
; meta (:version 1.0 :package "RADIANCE-CORE")
|
||||
((:interfaces (:admin . "r-simple-admin") (:auth . "r-simple-auth")
|
||||
(:ban . "r-simple-ban") (:cache . "r-simple-cache")
|
||||
(:data-model . "r-simple-model") (:database . "i-lambdalite")
|
||||
(:relational-database . "i-sqlite") (:logger . "i-verbose")
|
||||
(:mail . "i-smtp") (:profile . "r-simple-profile") (:rate . "r-simple-rate")
|
||||
(:server . "i-hunchentoot") (:session . "r-simple-sessions")
|
||||
(:user . "r-simple-users"))
|
||||
(:ban . "r-simple-ban") (:cache . "r-simple-cache")
|
||||
(:data-model . "r-simple-model") (:database . "i-lambdalite")
|
||||
(:relational-database . "i-sqlite") (:logger . "i-verbose")
|
||||
(:mail . "i-smtp") (:profile . "r-simple-profile") (:rate . "r-simple-rate")
|
||||
(:server . "i-hunchentoot") (:session . "r-simple-sessions")
|
||||
(:user . "r-simple-users"))
|
||||
(:versions
|
||||
. [hash-table equal ("radiance-core" :|2.2.0|) ("i-hunchentoot" :|1.1.0|)
|
||||
("asteroid" :|0.0.0|) ("i-log4cl" :|1.0.0|) ("r-clip" :|1.0.0|)
|
||||
("r-data-model" :|1.0.1|) ("i-lambdalite" :|1.0.0|)
|
||||
("r-simple-users" :|1.0.1|)
|
||||
("r-simple-errors" :|1.0.0|) ("i-verbose" :|1.0.0|)
|
||||
("r-simple-auth" :|1.0.0|) ("r-simple-sessions" :|1.0.1|)
|
||||
("r-ratify" :|1.0.0|) ("r-simple-rate" :|1.0.0|)
|
||||
("r-simple-profile" :|1.0.0|)])
|
||||
(:domains "radiance" "localhost")
|
||||
("asteroid" :|0.0.0|) ("i-log4cl" :|1.0.0|) ("r-clip" :|1.0.0|)
|
||||
("r-data-model" :|1.0.1|) ("i-lambdalite" :|1.0.0|)
|
||||
("r-simple-users" :|1.0.1|)
|
||||
("r-simple-errors" :|1.0.0|) ("i-verbose" :|1.0.0|)
|
||||
("r-simple-auth" :|1.0.0|) ("r-simple-sessions" :|1.0.1|)
|
||||
("r-ratify" :|1.0.0|) ("r-simple-rate" :|1.0.0|)
|
||||
("r-simple-profile" :|1.0.0|)])
|
||||
(:domains "asteroid" "radiance" "asteroid.radio" "localhost")
|
||||
(:startup :r-simple-errors :r-simple-sessions) (:routes)
|
||||
(:debugger . :if-swank-connected))
|
||||
|
|
|
|||
Loading…
Reference in New Issue