01/02: gnu: ranger: Fix build.

[guix-commits]

iyzsong pushed a commit to branch core-updates
in repository guix.

commit 28e9d7b4b21c5599d1aa16cf6d1247267d69efe6
Author: 宋文武 <iyzs...@member.fsf.org>
AuthorDate: Tue Jun 18 12:13:33 2024 +0800

    gnu: ranger: Fix build.
    
    * gnu/packages/disk.scm (ranger)[phases]: Put 'wrap-program' after 
'install'.
    
    Change-Id: I6a07b896995f40ff2169b1bc5aaf2251d353bdc7
---
 gnu/packages/disk.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gnu/packages/disk.scm b/gnu/packages/disk.scm
index a6b8481f64..b9d739f8fb 100644
--- a/gnu/packages/disk.scm
+++ b/gnu/packages/disk.scm
@@ -963,7 +963,7 @@ Duperemove can also take input from the @command{fdupes} 
program.")
        #:test-target "test_pytest"
        #:phases
        (modify-phases %standard-phases
-         (add-after 'configure 'wrap-program
+         (add-after 'install 'wrap-program
            ;; Tell 'ranger' where 'w3mimgdisplay' is.
            (lambda* (#:key inputs outputs #:allow-other-keys)
              (let* ((out  (assoc-ref outputs "out"))