Make sure the right path gets opened as DB.

This commit is contained in:
Dominik Pantůček 2023-09-17 16:18:04 +02:00
parent 1c15683ec3
commit 461ae8f91e

View file

@ -45,7 +45,7 @@
;; Returns (possibly cached) SQLite3 DB handle
(define (mailman3-db)
(when (not (*cached-mailman3-db*))
(*cached-mailman3-db* (open-database "mailman.db")))
(*cached-mailman3-db* (open-database (*mailman3-sql-path*))))
(*cached-mailman3-db*))
;; Returns the list of mailman3 mailinglists by querying te