From 2f94863679665ed41b371fdeb499e53c4e429eec Mon Sep 17 00:00:00 2001 From: Munyoki Kilyungi Date: Tue, 4 Jul 2023 23:26:21 +0300 Subject: Use call-with-target-database when dumping schema annotations * dump/schema-dump.scm (dump-schema-annotations): Replace call-with-genenetwork-database with call-with-target-database. --- dump/schema-dump.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'dump') diff --git a/dump/schema-dump.scm b/dump/schema-dump.scm index cda3fd0..876eafb 100644 --- a/dump/schema-dump.scm +++ b/dump/schema-dump.scm @@ -38,7 +38,7 @@ (TableComments)))) (define (dump-schema-annotations db) - (call-with-genenetwork-database + (call-with-target-database (lambda (db) (for-each (cut dump-table-fields db <>) (get-tables-from-comments db))))) -- cgit v1.2.3