diff --git a/cl-bible.lisp b/cl-bible.lisp
index 03c11b1..bce3f30 100644
--- a/cl-bible.lisp
+++ b/cl-bible.lisp
@@ -11,5 +11,7 @@
   (loop))
 
 (defun build ()
-  (mapc (lambda (bible) (mapc (lambda (verse) (setf (cl-bible.verse:notes verse) nil)) bible)) (list cl-bible.data::*mng* cl-bible.data::*kjv* cl-bible.data::*vul* cl-bible.data::*grb*))
+  (mapc (lambda (verse)
+          (setf (cl-bible.verse:notes verse) nil))
+        cl-bible.data:*bible*)
   #+sbcl (sb-ext:save-lisp-and-die "bible" :executable t :toplevel #'main))