From 1243222d9d09bc6756bcb52c19003b95c8eea36c Mon Sep 17 00:00:00 2001
From: Silas Vedder <singingfox123@protonmail.com>
Date: Thu, 5 May 2022 13:08:49 +0200
Subject: [PATCH] Added main.

---
 cl-bible.lisp | 4 ++++
 package.lisp  | 4 +++-
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/cl-bible.lisp b/cl-bible.lisp
index f08fbe6..3c4dbf2 100644
--- a/cl-bible.lisp
+++ b/cl-bible.lisp
@@ -126,3 +126,7 @@
 (defun start ()
   (initialize #'on-new-window)
   (open-browser))
+
+(defun main ()
+  (start)
+  (loop))
diff --git a/package.lisp b/package.lisp
index 5aca335..e19576d 100644
--- a/package.lisp
+++ b/package.lisp
@@ -1,4 +1,6 @@
 ;;;; package.lisp
 
 (defpackage #:cl-bible
-  (:use #:cl #:clog #:clog-gui))
+  (:use #:cl #:clog #:clog-gui)
+  (:exports main
+            start))