From f1ca8285f8375760d2fa651e125a99120e5050d4 Mon Sep 17 00:00:00 2001 From: Vivien Kraus Date: Thu, 29 Jul 2021 11:00:51 +0200 Subject: The package should know its release date to generate a doap description --- update-channel.scm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'update-channel.scm') 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 -- cgit v1.2.3