From 794ac156f62c858b9316667616397d29f9cfb2a1 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Fri, 14 Apr 2023 22:34:20 +0200 Subject: Allow compilation without sqlite3 module. --- module/vcomponent/data-stores/sqlite.scm | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) (limited to 'module/vcomponent/data-stores/sqlite.scm') diff --git a/module/vcomponent/data-stores/sqlite.scm b/module/vcomponent/data-stores/sqlite.scm index f26cd688..b5b566a8 100644 --- a/module/vcomponent/data-stores/sqlite.scm +++ b/module/vcomponent/data-stores/sqlite.scm @@ -1,5 +1,4 @@ (define-module (vcomponent data-stores sqlite) - :use-module (sqlite3) :use-module (oop goops) :use-module (vcomponent data-stores common) :use-module (srfi srfi-71) @@ -9,6 +8,13 @@ :use-module ((hnh util) :select (aif)) ) + +(catch 'misc-error + (lambda () + (use-modules (sqlite3)) + (provide 'data-store-sqlite)) + (lambda args 'no-op)) + ;; (define (sqlite-exec db str) ;; (display str) ;; ((@ (sqlite3) sqlite-exec) db str)) -- cgit v1.2.3