diff options
| author | Christopher Baines <mail@cbaines.net> | 2019-11-09 20:39:47 +0000 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2019-11-09 20:39:47 +0000 |
| commit | 7b3bc5bcfa1fd92e97712d54cce3c9c4f93da043 (patch) | |
| tree | 4b6606c9f154f0a77ea03e9b361182754d7ddb97 /guix-data-service/model/build.scm | |
| parent | 4710d4e3983b48d41f56a9ac17b2ecf31af2a6dd (diff) | |
| download | data-service-7b3bc5bcfa1fd92e97712d54cce3c9c4f93da043.tar data-service-7b3bc5bcfa1fd92e97712d54cce3c9c4f93da043.tar.gz | |
Improve some derivation model functions
Return integer values for ids, rather than strings (as this type is more
appropriate). Also, better parse the derivation arguments and environment
variables.
Diffstat (limited to 'guix-data-service/model/build.scm')
| -rw-r--r-- | guix-data-service/model/build.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/guix-data-service/model/build.scm b/guix-data-service/model/build.scm index bcfa444..74fe296 100644 --- a/guix-data-service/model/build.scm +++ b/guix-data-service/model/build.scm @@ -60,7 +60,7 @@ "WHERE builds.derivation_id = $1 " "ORDER BY latest_build_status.status_fetched_at DESC ")) - (exec-query conn query (list derivation-id))) + (exec-query conn query (list (number->string derivation-id)))) (define (select-build-by-build-server-and-id conn build-server-id id) |