[no subject]

[Christopher Baines]

branch: master
commit 9eb96d1b197d674d34daf4de8c75fa9ee337f583
Author: Christopher Baines <address@hidden>
AuthorDate: Fri Jan 24 19:46:25 2020 +0000

    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