From d56532c568d66c4b38552c0c96777d4b770374a2 Mon Sep 17 00:00:00 2001
From: Efraim Flashner <efraim@flashner.co.il>
Date: Wed, 24 Jan 2024 21:52:50 +0200
Subject: [PATCH] gnu: patchelf: Fix test suite.

* gnu/packages/elf.scm (patchelf)[arguments]: Adjust 'fix-tests phase
for changes in the test suite.

Change-Id: Iffeb4ef94e0d78edd47d9d8b6e316f3b29627ed0
---
 gnu/packages/elf.scm | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/elf.scm b/gnu/packages/elf.scm
index 688aeed076..dc2db83632 100644
--- a/gnu/packages/elf.scm
+++ b/gnu/packages/elf.scm
@@ -2,7 +2,7 @@
 ;;; Copyright © 2013, 2014, 2015 Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright © 2014, 2015 Mark H Weaver <mhw@netris.org>
 ;;; Copyright © 2015 Andreas Enge <andreas@enge.fr>
-;;; Copyright © 2017-2023 Efraim Flashner <efraim@flashner.co.il>
+;;; Copyright © 2017-2024 Efraim Flashner <efraim@flashner.co.il>
 ;;; Copyright © 2017 Leo Famulari <leo@famulari.name>
 ;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr>
 ;;; Copyright © 2018, 2020 Marius Bakke <mbakke@fastmail.com>
@@ -307,8 +307,10 @@ static analysis of the ELF binaries at hand.")
              (substitute* "tests/set-empty-rpath.sh"
                ;; Binaries with empty RPATHs cannot run on Guix, because
                ;; we still need to find libgcc_s (see above).
-               (("^\\$\\{SCRATCH\\}\\/simple.$") ""))
-             #t)))))
+               (("^\"\\$\\{SCRATCH\\}\"\\/simple.$") ""))
+             ;; Skip this test for now.
+             (substitute* "tests/Makefile.in"
+               ((".*shared-rpath\\.sh \\.*") "")))))))
     (native-inputs
      `(("gcc:lib" ,gcc "lib")))
     (home-page "https://nixos.org/patchelf.html")