From 21363801ae8d9c5812e7ca352de4f8954c690af9 Mon Sep 17 00:00:00 2001
From: Tobias Geerinckx-Rice <me@tobias.gr>
Date: Sun, 24 Sep 2023 02:00:00 +0200
Subject: [PATCH] gnu: bcachefs-tools: Remove obsolete phase.

* gnu/packages/file-systems.scm (bcachefs-tools)[arguments]: Remove
obsolete phase to 'patch-shell-wrappers that no longer exist.
---
 gnu/packages/file-systems.scm | 12 +-----------
 1 file changed, 1 insertion(+), 11 deletions(-)

diff --git a/gnu/packages/file-systems.scm b/gnu/packages/file-systems.scm
index f10d56ec3f..b98a838f43 100644
--- a/gnu/packages/file-systems.scm
+++ b/gnu/packages/file-systems.scm
@@ -619,17 +619,7 @@ (define-public bcachefs-tools
                                                "not test_fsck and "
                                                "not test_list and "
                                                "not test_list_inodes and "
-                                               "not test_list_dirent")))))
-                 (add-after 'install 'patch-shell-wrappers
-                   ;; These are overcomplicated wrappers that invoke readlink(1)
-                   ;; to exec the appropriate bcachefs(8) subcommand.  We can
-                   ;; simply patch in the latter file name directly, and do.
-                   (lambda _
-                     (let ((sbin/ (string-append #$output "/sbin/")))
-                       (substitute* (find-files sbin/ (lambda (file stat)
-                                                        (not (elf-file? file))))
-                         (("SDIR=.*") "")
-                         (("\\$\\{SDIR.*}/") sbin/))))))))
+                                               "not test_list_dirent"))))))))
       (native-inputs
        (cons* pkg-config
               ;; For generating documentation with rst2man.