From 46daff38bc2ce03d28480fa7a479c5c51e61001f Mon Sep 17 00:00:00 2001 From: Eric Bavier Date: Fri, 4 Sep 2020 09:29:31 -0500 Subject: gnu: fpc: Fix reproducibility problem. * gnu/packages/pascal.scm (fpc)[arguments]: Add 'patch-release-date' to replace a build timestamp with the release date instead. --- gnu/packages/pascal.scm | 15 ++++++++++++++- 1 file changed, 14 insertions(+), 1 deletion(-) diff --git a/gnu/packages/pascal.scm b/gnu/packages/pascal.scm index 9ae1b29085..811d02f128 100644 --- a/gnu/packages/pascal.scm +++ b/gnu/packages/pascal.scm @@ -1,5 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2017 Kei Kebreau +;;; Copyright © 2020 Eric Bavier ;;; ;;; This file is part of GNU Guix. ;;; @@ -54,7 +55,7 @@ (define-public fpc (package (name "fpc") - (version "3.2.0") + (version "3.2.0") ; Update release date below! (source (origin (method url-fetch) (uri (string-append "mirror://sourceforge/freepascal/Source/" @@ -132,6 +133,18 @@ (substitute* "fpcsrc/compiler/cscript.pas" (("#!/bin/sh") (string-append "#!" (which "sh")))) #t)) + (add-before 'build 'patch-release-date + (lambda _ ; reproducibility + (substitute* (list "fpcdocs/prog.tex" + "fpcsrc/packages/amunits/examples/sortdemo.pas" + "fpcsrc/packages/libogcfpc/src/ogc/libversion.inc" + "fpcsrc/utils/fpcres/fpcjres.pas" + "fpcsrc/utils/fpcres/fpcres.pas" + "fpcsrc/utils/fpcm/fpcmmain.pp" + "fpcsrc/utils/fpcreslipo/fpcreslipo.pp" + "fpcsrc/compiler/version.pas") + (("\\{\\$I(NCLUDE)? %DATE%\\}") "'2020/06/19'")) + #t)) (replace 'configure (lambda* (#:key inputs outputs #:allow-other-keys) (substitute* "fpcsrc/compiler/systems/t_linux.pas" -- cgit v1.2.3