aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/cuirass/database.scm3
1 files changed, 1 insertions, 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