diff options
Diffstat (limited to 'update-channel.scm')
| -rw-r--r-- | update-channel.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/update-channel.scm b/update-channel.scm index 5e0d9fd..dc5cafd 100644 --- a/update-channel.scm +++ b/update-channel.scm @@ -61,9 +61,11 @@ tmp-dirname (invoke bash "-c" (format #f "guix hash -r source > hash"))) (invoke bash "-c" (format #f "~a describe --tags --always > ~a/version" git tmp-dirname)) + (invoke bash "-c" (format #f "~a show -s --format=%cI > ~a/release-date" git tmp-dirname)) (invoke bash "-c" (format #f "~a rev-parse master > ~a/commit" git tmp-dirname)) (let ((hash (call-with-input-file (string-append tmp-dirname "/hash") read-line)) (version (call-with-input-file (string-append tmp-dirname "/version") read-line)) + (release-date (call-with-input-file (string-append tmp-dirname "/release-date") read-line)) (commit (call-with-input-file (string-append tmp-dirname "/commit") read-line)) (interned-modules (run-with-store @@ -79,7 +81,7 @@ (chmod "vkraus/packages/webid-oidc.scm" #o644) (let ((port (open-file "vkraus/packages/webid-oidc.scm" "a"))) (write `(define-public webid-oidc - (webid-oidc-release ,version ,commit ,hash)) + (webid-oidc-release ,version ,release-date ,commit ,hash)) port) (display "\n" port) (write `(define-public webid-oidc-html |