diff options
| author | Christopher Baines <mail@cbaines.net> | 2020-07-04 20:54:10 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2020-07-04 20:54:10 +0100 |
| commit | 7e958b8d5e7e9630391be21db9ec28fef2acbf5f (patch) | |
| tree | 255dd9912aabff0f3e7d9c3d42cfffd1ab4376ab | |
| parent | 2f42a84595903baba6667ae63ee4873ce56d1fdf (diff) | |
| download | build-coordinator-7e958b8d5e7e9630391be21db9ec28fef2acbf5f.tar build-coordinator-7e958b8d5e7e9630391be21db9ec28fef2acbf5f.tar.gz | |
Remove backtick that snuck in
| -rw-r--r-- | guix-build-coordinator/hooks.scm | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/guix-build-coordinator/hooks.scm b/guix-build-coordinator/hooks.scm index fee06da..629372f 100644 --- a/guix-build-coordinator/hooks.scm +++ b/guix-build-coordinator/hooks.scm @@ -277,10 +277,10 @@ (derivation . ,(assq-ref build-details 'derivation-name)) ,@(let ((created-at (assq-ref build-details 'created-at))) (if created-at - `((timestamp` . ,(string->number - (strftime - "%s" - (assq-ref build-details 'created-at))))) + `((timestamp . ,(string->number + (strftime + "%s" + (assq-ref build-details 'created-at))))) '()))))))) (define (build-started-send-event-to-guix-data-service-hook target-url) @@ -326,10 +326,10 @@ (derivation . ,(assq-ref build-details 'derivation-name)) ,@(let ((end-time (assq-ref build-details 'end-time))) (if end-time - `((timestamp` . ,(string->number - (strftime "%s" - (assq-ref build-details - 'end-time))))) + `((timestamp . ,(string->number + (strftime "%s" + (assq-ref build-details + 'end-time))))) '()))))))) (define (build-failure-send-event-to-guix-data-service-hook target-url) @@ -348,8 +348,8 @@ (derivation . ,(assq-ref build-details 'derivation-name)) ,@(let ((end-time (assq-ref build-details 'end-time))) (if end-time - `((timestamp` . ,(string->number - (strftime "%s" - (assq-ref build-details - 'end-time))))) + `((timestamp . ,(string->number + (strftime "%s" + (assq-ref build-details + 'end-time))))) '()))))))) |