From 52431e42ef92beb89ef31e3fd3ec178254b8d630 Mon Sep 17 00:00:00 2001
From: Tobias Geerinckx-Rice <me@tobias.gr>
Date: Sun, 22 May 2022 02:00:00 +0200
Subject: gnu: lynis: Work.

Work around <https://issues.guix.gnu.org/55287>.

* gnu/packages/admin.scm (lynis)[arguments]: Add a custom 'unpack phase
that doesn't MAKE-FILE-WRITABLE.
---
 gnu/packages/admin.scm | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'gnu/packages/admin.scm')

diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index 38239e1f05..d22753c64f 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -4399,6 +4399,13 @@ Logitech Unifying Receiver.")
     (arguments
      `(#:phases
        (modify-phases %standard-phases
+         (replace 'unpack
+           ;; XXX Remove after fixing <https://issues.guix.gnu.org/55287>.
+           (lambda* (#:key source #:allow-other-keys)
+             (mkdir "source")
+             (chdir "source")
+             (copy-recursively source "."
+                               #:keep-mtime? #t)))
          (replace 'configure
            (lambda* (#:key inputs outputs #:allow-other-keys)
              (substitute* "lynis"
-- 
cgit v1.2.3