1.1--- a/lisp/lib/packy/db.lisp	Tue Jun 11 22:44:32 2024 -0400
     1.2+++ b/lisp/lib/packy/db.lisp	Wed Jun 12 17:34:07 2024 -0400
     1.3@@ -1,29 +1,34 @@
     1.4-(in-package :packy/core)
     1.5+;;; db.lisp --- Packy Database
     1.6+
     1.7+;; 
     1.8 
     1.9-(defclass packy-db (database) ()
    1.10+;;; Code:
    1.11+(in-package :packy/db)
    1.12+
    1.13+(defclass package-database (database) ()
    1.14   (:default-initargs 
    1.15    :db (make-rdb "packy" (default-rdb-opts) #())))
    1.16 
    1.17 (defmethod make-db ((engine (eql :packy)) &rest initargs &key &allow-other-keys)
    1.18-  (apply #'make-instance 'packy-db initargs))
    1.19+  (apply #'make-instance 'package-database initargs))
    1.20 
    1.21-(defmethod connect-db ((db packy-db) &key &allow-other-keys)
    1.22+(defmethod connect-db ((db package-database) &key &allow-other-keys)
    1.23   (open-db (db db)))
    1.24 
    1.25-(defmethod db-query ((db packy-db) query &key &allow-other-keys))
    1.26+(defmethod db-query ((db package-database) query &key &allow-other-keys))
    1.27   
    1.28-(defmethod db-get ((db packy-db) (key simple-string) &key &allow-other-keys)
    1.29+(defmethod db-get ((db package-database) (key simple-string) &key &allow-other-keys)
    1.30   ;; lol
    1.31     (with-db (db (db db))
    1.32       (get-kv-str-raw db key)))
    1.33 
    1.34-(defmethod close-db ((db packy-db) &key &allow-other-keys)
    1.35+(defmethod close-db ((db package-database) &key &allow-other-keys)
    1.36   (close-db (db db)))
    1.37 
    1.38-(defmethod destroy-db ((db packy-db))
    1.39+(defmethod destroy-db ((db package-database))
    1.40   (destroy-db (db db)))
    1.41 
    1.42-(defmethod get-val ((obj packy-db) (elt simple-string) &optional data-type)
    1.43+(defmethod get-val ((obj package-database) (elt simple-string) &optional data-type)
    1.44   (declare (ignore data-type))
    1.45   (db-get obj elt))
    1.46