diff of fa6f7aea3f6f4561436fa9b4244fd90d3f384047
fa6f7aea3f6f4561436fa9b4244fd90d3f384047
diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..72b0d98
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1,2 @@
+*~
+*.fasl
\ No newline at end of file
diff --git a/aggressive-murja.asd b/aggressive-murja.asd
new file mode 100644
index 0000000..e26bd66
--- /dev/null
+++ b/aggressive-murja.asd
@@ -0,0 +1,29 @@
+(defsystem "aggressive-murja"
+ :version "3.0.0-devel"
+ :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"
+ "log4cl"
+ "cl-advice")
+ :description "A rewrite of the <a href=\"https://github.com/feuery/murja-blog/\">murja blogging engine</a> in lisp"
+ :components ((:module "src"
+ :components
+ ((:module "posts"
+ :components
+ ((:file "post-db")))
+ (:file "main")))))
+
+
+
diff --git a/src/main.lisp b/src/main.lisp
new file mode 100644
index 0000000..e6f50da
--- /dev/null
+++ b/src/main.lisp
@@ -0,0 +1,6 @@
+(defpackage murja
+ (:use :cl)
+ (:import-from :murja.posts.post-db :test))
+
+(format t "Loaded murja, calling inner fns: ~a~%" (test 3))
+
diff --git a/src/posts/post-db.lisp b/src/posts/post-db.lisp
new file mode 100644
index 0000000..fda09e3
--- /dev/null
+++ b/src/posts/post-db.lisp
@@ -0,0 +1,7 @@
+(defpackage :murja.posts.post-db
+ (:use :cl)
+ (:export :test))
+
+(defun test (a)
+ (* a a ))
+