Added a few more packages

meeting-minds.org

@@ -142,13 +142,55 @@ To accomplish this task, I've decided to build using the following tools and sui
 
 This file describes and defines that packages, or namespaces used in the application.  These include the following:
 
+ - ~meeting-minds.db~ :: The database interaction layer.
+ - ~meeting-minds.protocol~ :: The server-side implementation of the protocol.  This handles authentication, channel management and the like.
+ - ~meeting-minds.protocol-client~ :: The client side implementation of the protocol.  This will handle authentication with the server and provide an interface for both the GUI client and programmable bots.
+ - ~meeting-minds.log~ :: This provides the logging portion of the server system, and will be used to create logs of group channels.
+ - ~meeting-minds.web-interface~ :: This provides a management interface and log access system.
+ - ~meeting-minds.ui~ :: This provides a user interface for chat, log retrieval and management.
  - ~meeting-minds~ :: The main package, this is used to tie all of the other packages together, and can be used to produce a callable daemon.
 
 #+Caption: Packages
 #+Name: packages
 #+BEGIN_SRC lisp :tangle "package.lisp"
+  (defpackage #:meeting-minds.db
+    (:use #:cl
+          #:clsql))
+
+  (defpackage #:meeting-minds.protocol
+    (:use #:cl
+          #:birch
+          #:meeting-minds.db))
+
+  (defpackage #:meeting-minds.protocol-client
+    (:use #:cl
+          #:birch))
+
+  (defpackage #:meeting-minds.log
+    (:use #:cl
+          #:cl-who
+          #:meeting-minds.db))
+
+  (defpackage #:meeting-minds.web-interface
+    (:use #:cl
+          #:ningle
+          #:clack-errors
+          #:cl-mustache
+          #:meeting-minds.db
+          #:meeting-minds.log))
+
+  (defpackage #:meeting-minds.ui
+    (:use #:cl
+          #:meeting-minds.protocol-client
+          #:commonqt
+          #:qtools
+          #:qtools-ui))
+
   (defpackage #:meeting-minds
-    (:use #:cl))
+    (:use #:cl
+          #:meeting-minds.protocol
+          #:meeting-minds.log
+          #:meeting-minds.web-interface))
 #+END_SRC
 
 ** DONE The *ASDF* System Definition

package.lisp

@@ -1,4 +1,40 @@
 ;; packages, meeting-minds.org
+(defpackage #:meeting-minds.db
+  (:use #:cl
+        #:clsql))
+
+(defpackage #:meeting-minds.protocol
+  (:use #:cl
+        #:birch
+        #:meeting-minds.db))
+
+(defpackage #:meeting-minds.protocol-client
+  (:use #:cl
+        #:birch))
+
+(defpackage #:meeting-minds.log
+  (:use #:cl
+        #:cl-who
+        #:meeting-minds.db))
+
+(defpackage #:meeting-minds.web-interface
+  (:use #:cl
+        #:ningle
+        #:clack-errors
+        #:cl-mustache
+        #:meeting-minds.db
+        #:meeting-minds.log))
+
+(defpackage #:meeting-minds.ui
+  (:use #:cl
+        #:meeting-minds.protocol-client
+        #:commonqt
+        #:qtools
+        #:qtools-ui))
+
 (defpackage #:meeting-minds
-  (:use #:cl))
+  (:use #:cl
+        #:meeting-minds.protocol
+        #:meeting-minds.log
+        #:meeting-minds.web-interface))
 ;; packages ends here