~ruther/guix-local: gnu: gnunet-scheme: Make scheme-gnunet.pdf reproducible.

85aa25cd6a8f18b279acf3ede3ed3e74820a9635 — Maxime Devos 3 years ago 77b37fc

gnu: gnunet-scheme: Make scheme-gnunet.pdf reproducible.

* gnu/packages/gnunet.scm
(gnunet-scheme)[arguments]<#:phases>{reproducible-timestamp}:
New phase.

Signed-off-by: Marius Bakke <marius@gnu.org>

patch browse .tar.gz .zip

1 files changed, 11 insertions(+), 0 deletions(-)

M gnu/packages/gnunet.scm

M gnu/packages/gnunet.scm => gnu/packages/gnunet.scm +11 -0

@@ 33,6 33,7 @@
   #:use-module (gnu packages file)
   #:use-module (gnu packages aidc)
   #:use-module (gnu packages autotools)
+  #:use-module (gnu packages check)
   #:use-module (gnu packages compression)
   #:use-module (gnu packages crypto)
   #:use-module (gnu packages curl)


@@ 363,6 364,15 @@ services.")
                (base32
                 "0kvqbqijfyp3fhsqjyzwd7b3cm5khwv557wq196mv6rx47aaivgd"))))
     (build-system gnu-build-system)
+    (arguments
+     (list #:phases
+           #~(modify-phases %standard-phases
+               ;; For reproducibility, do not insert real timestamps in the PDF.
+               (add-after 'unpack 'reproducible-timestamp
+                 (lambda _
+                   (substitute* "Makefile.am"
+                     (("\\$\\(TEXMACS_CONVERT\\)")
+                      "faketime -m -f '1970-01-01 00:00:00' $(TEXMACS_CONVERT)")))))))
     (inputs (list guile-3.0)) ;for pkg-config
     (propagated-inputs (list guile-bytestructures guile-gcrypt guile-pfds
                              guile-fibers-1.1))


@@ 373,6 383,7 @@ services.")
                          guile-gcrypt
                          guile-pfds
                          guile-fibers-1.1
+                         libfaketime
                          automake
                          autoconf
                          pkg-config