From af3e0b808a828819b43b41acbfa9ac25f1bf30d3 Mon Sep 17 00:00:00 2001 From: Marius Peter Date: Sat, 13 Dec 2025 22:36:57 +0100 Subject: Ignore unused variable. --- db/migrations.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'db') diff --git a/db/migrations.rkt b/db/migrations.rkt index db3093c..39490f0 100644 --- a/db/migrations.rkt +++ b/db/migrations.rkt @@ -10,7 +10,7 @@ (define (migrate-all!) (for ([pair (in-list (unbox migrations-box))]) - (match-define (cons migration-name stmts) pair) + (match-define (cons _ stmts) pair) (with-tx (for ([stmt (in-list stmts)]) (query-exec (current-conn) stmt))))) -- cgit v1.2.3