From 9eb96d1b197d674d34daf4de8c75fa9ee337f583 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Fri, 24 Jan 2020 19:46:25 +0000 Subject: database: Don't return rowid from db-add-input. As it is unused from where db-add-input is called. * src/cuirass/database.scm (db-add-input): Don't call and return (last-insert-rowid). --- src/cuirass/database.scm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/src/cuirass/database.scm b/src/cuirass/database.scm index 308b5c3..1643916 100644 --- a/src/cuirass/database.scm +++ b/src/cuirass/database.scm @@ -303,8 +303,7 @@ tag, revision, no_compile_p) VALUES (" (assq-ref input #:branch) ", " (assq-ref input #:tag) ", " (assq-ref input #:commit) ", " - (if (assq-ref input #:no-compile?) 1 0) ");") - (last-insert-rowid db))) + (if (assq-ref input #:no-compile?) 1 0) ");"))) (define (db-add-checkout spec-name eval-id checkout) "Insert CHECKOUT associated with SPEC-NAME and EVAL-ID. If a checkout with -- cgit v1.2.3