1 files changed, 3 insertions, 10 deletions
diff --git a/cap-muck.lsp b/cap-muck.lsp
index fd90626..8cace16 100644
--- a/cap-muck.lsp
+++ b/cap-muck.lsp
@@ -1,9 +1,3 @@
-(defpackage #:cap-muck
-  (:use #:openlisp)
-  (:export
-   #:main)
-  )
-(in-package #:cap-muck)
 (defglobal *terminate-program* nil)
 
 (defconstant +bold+ "#\esc[1m")
@@ -109,9 +103,7 @@
   ())
 
 ;; TODO: Use the reader, for prototype at least?
-;;       Can switch to postmodern for production.
-;;
-;;       Or dbm?
+;;       Or dbm? (Espcially for production.)
 (defun read-room-database ()
   (setq *rooms* '())
   (with-open-input-file (file +rdb+)
@@ -180,4 +172,5 @@
   (read-room-database)
   (while (not *terminate-program*)
          (check-for-inputs)))
-(provide "cap-muck")
+(main)
+