- (intern (symbol-name '#:disconnect) pkg)
- (slot-value db 'sql-fn)
- (intern (symbol-name '#:sql) pkg)
- (slot-value db 'close-query-fn)
- (intern (symbol-name '#:close-query) pkg)
- (slot-value db 'fetch-row)
- (intern (symbol-name '#:fetch-row) pkg)
- (slot-value db 'list-all-database-tables-fn)
- (intern (symbol-name '#:list-all-database-tables) pkg)
- (slot-value db 'list-all-table-columns-fn)
- (intern (symbol-name '#:list-all-table-columns) pkg))))
+ (intern (symbol-name '#:disconnect) pkg)
+ (slot-value db 'sql-fn)
+ (intern (symbol-name '#:sql) pkg)
+ (slot-value db 'close-query-fn)
+ (intern (symbol-name '#:close-query) pkg)
+ (slot-value db 'fetch-row)
+ (intern (symbol-name '#:fetch-row) pkg)
+ (slot-value db 'list-all-database-tables-fn)
+ (intern (symbol-name '#:list-all-database-tables) pkg)
+ (slot-value db 'list-all-table-columns-fn)
+ (intern (symbol-name '#:list-all-table-columns) pkg))))