From 3e676b49b9b702051257d5afbfeb66c056a57088 Mon Sep 17 00:00:00 2001
From: Arun Isaac <arunisaac@systemreboot.net>
Date: Fri, 23 May 2025 19:15:19 +0100
Subject: [PATCH] gnu: guile-lens: Patch hall.scm.

* gnu/packages/guile-xyz.scm (guile-lens)[arguments]: Patch hall.scm before
invoking hall in run-hall phase.
---
 gnu/packages/guile-xyz.scm | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm
index 76150122f9..bd7ad3f515 100644
--- a/gnu/packages/guile-xyz.scm
+++ b/gnu/packages/guile-xyz.scm
@@ -5651,6 +5651,11 @@ not provide a way to change the headers on its own.")
            (add-after 'unpack 'run-hall
              (lambda _
                (setenv "HOME" "/tmp")   ; for ~/.hall
+               ;; Patch hall.scm.
+               (substitute* "hall.scm"
+                 (("\\(copyright '\\(2018\\)\\)")
+                  "(email \"alex@pompo.co\") (copyright (2018))"))
+               ;; Invoke hall.
                (invoke "hall" "build-system" "-x"))))))
       (native-inputs
        (list autoconf