aggressive-murja.asd

DOWNLOAD
(require 'asdf)
(in-package :asdf-user)

(defsystem "aggressive-murja"
  :version "3.0.0"
  :author "Ilpo Lehtinen"
  :licence "GPLv3"
  :depends-on ("postmodern"
               "simple-date"
               "simple-date/postgres-glue"
	       "ironclad"
	       "trivial-utf-8"
	       "binding-arrows"
	       "hunchentoot"
	       "cl-ppcre"
	       "parse-number"
	       "com.inuoe.jzon"
	       "easy-routes"
	       "drakma"
               "str"
	       "cl-fad"
	       "log4cl"
	       "cl-advice"
	       "xml-emitter"
	       "drakma"
	       "xmls"
	       ;; works in cl universal time (epoch at 1900)
	       "cl-date-time-parser"
	       "alexandria"
	       "uuid"
	       "cl-hash-util"
	       "spinneret"
	       "parenscript"
	       "paren-async")
  :description "A rewrite of the <a href=\"https://github.com/feuery/murja-blog/\">murja blogging engine</a> in lisp"
  :components ((:module "src"
		:components
		((:module "packages"
		  :components
		  ((:file "lisp-fixup")
		   (:file "halisql")
		   (:file "migrations")
		   (:file "json")
		   (:file "session-db")
		   (:file "middleware-db")
		   (:file "user")
		   (:file "post")
		   (:file "log")
		   (:file "settings")
		   (:file "setting-definitions")
		   (:file "genurl")
		   (:file "json-middleware")
		   (:file "auth")
		   (:file "session")
		   (:file "post-db")
		   (:file "media-db")
		   (:file "reader-db")
		   (:file "login-routes")
		   (:file "post-routes")
		   (:file "media-routes")
		   (:file "rss-routes")
		   (:file "rss-reader-routes")
		   (:file "user-editor")
		   (:file "root-routes")
		   (:file "root-component")
		   (:file "tabs-component")
		   (:file "blogpost-component")
		   (:file "single-post")
		   (:file "blog-root")
		   (:file "tag-script")
		   (:file "previouslies-script")
		   (:file "dnd-script")
		   (:file "editor")
		   (:file "components-log")
		   (:file "post-list")
		   (:file "media-admin")
		   (:file "new-post")
		   (:file "logs")
		   (:file "rss")
		   (:file "settings-view")
		   (:file "main")))
		 
		 (:module "local-lib"
		  :components ((:file "lisp-fixup")
			       (:file "halisql")
			       (:file "migrations")
			       (:file "json")))
		 
		 (:file "migration-list")
		 (:file "session-db")
		 (:file "middleware-db")
		 (:module "model"
		  :components
		  ((:file "user")
		   (:file "post")
		   (:file "log")
		   (:file "settings")))
		 (:file "setting-definitions")
		 (:file "genurl")
		 (:module "middleware"
		  :components ((:file "json")
			       (:file "auth")))
		 (:file "session")
		 (:module "posts"
		  :components
		  ((:file "post-db")))

		 (:module "media"
		  :components
		  ((:file "media-db")))

		 (:module "rss"
		  :components
		  ((:file "reader-db")))

		 (:module "routes"
		  :components
		  ((:file "login-routes")
		   (:file "post-routes")
		   (:file "media-routes")
		   (:file "rss-routes")
		   (:file "rss-reader-routes")
		   (:file "user-editor")
		   (:file "root-routes")))

		 (:module "view"
		  :components
		  ((:module "components"
		    :components ((:file "root")
				 (:file "tabs")
				 (:file "blogpost")))
		   (:file "single-post")
		   (:file "blog-root")
		   (:module "admin"
		    :components ((:module "components"
				  :components ((:file "tag-script")
					       (:file "previouslies-script")
					       (:file "dnd-script")
					       (:file "editor")
					       (:file "log")))
				 (:file "post-list")
				 (:file "media-admin")
				 (:file "new-post")
				 (:file "logs")))
		   (:file "rss")
		   (:file "settings")))
		 (:file "main"))))
  :build-operation program-op
  :build-pathname "murja"
  :entry-point "murja:main"
  :in-order-to ((test-op (test-op "aggressive-murja/tests"))))

(defsystem "aggressive-murja/tests"
  :author  "Ilpo Lehtinen"
  :licence "GPLv3"
  :depends-on ("aggressive-murja"
	       "fiveam")
  :components ((:module "test"
		:components
		((:file "literal")
		 (:file "literal-test")
		 (:file "tests")
		 (:file "rss-tests")
		 (:file "session-tests")
		 (:file "genurl-tests"))))
  :perform (test-op (op c)
		    (eval (read-from-string "(fiveam:run! 'murja.tests:main-suite)"))))

;; (ql:quickload "aggressive-murja")
;; (asdf:test-system :aggressive-murja)

;; (cl-user::run)