01/137: gnu: rust: Move remove-uninstall-script to rust.

[guix-commits]

efraim pushed a commit to branch rust-team
in repository guix.

commit 8bbd709c4b3db22625b417a5f12a1fe5c254b3d8
Author: Efraim Flashner <efraim@flashner.co.il>
AuthorDate: Sun Dec 17 16:51:49 2023 +0200

    gnu: rust: Move remove-uninstall-script to rust.
    
    * gnu/packages/rust.scm (rust)[arguments]: Add 'remove-uninstall-script
    phase.
    (make-rust-sysroot)[arguments]: Remove 'remove-uninstall-script phase.
    
    Change-Id: I45bcaaa89003693b490b914efbfa34236a8f4db6
---
 gnu/packages/rust.scm | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/gnu/packages/rust.scm b/gnu/packages/rust.scm
index ea95d27476..d953b56990 100644
--- a/gnu/packages/rust.scm
+++ b/gnu/packages/rust.scm
@@ -1036,6 +1036,12 @@ safety and thread safety guarantees.")
                    (mkdir-p (string-append out dest))
                    (copy-recursively "library" (string-append out dest 
"/library"))
                    (copy-recursively "src" (string-append out dest "/src")))))
+             (add-after 'install 'remove-uninstall-script
+               (lambda* (#:key outputs #:allow-other-keys)
+                 ;; This script has no use on Guix
+                 ;; and it retains a reference to the host's bash.
+                 (delete-file (string-append (assoc-ref outputs "out")
+                                             "/lib/rustlib/uninstall.sh"))))
              (add-after 'install-rust-src 'wrap-rust-analyzer
                (lambda* (#:key outputs #:allow-other-keys)
                  (let ((bin (string-append (assoc-ref outputs "tools") 
"/bin")))
@@ -1187,12 +1193,6 @@ ar = \"" (search-input-file inputs (string-append 
"/bin/" ,(ar-for-target target
              (replace 'install
                (lambda _
                  (invoke "./x.py" "install" "library/std")))
-             (add-after 'install 'remove-uninstall-script
-               (lambda* (#:key outputs #:allow-other-keys)
-                 ;; This script has no use on Guix
-                 ;; and it retains a reference to the host's bash.
-                 (delete-file (string-append (assoc-ref outputs "out")
-                                             "/lib/rustlib/uninstall.sh"))))
              (delete 'install-rust-src)
              (delete 'wrap-rust-analyzer)
              (delete 'wrap-rustc)))))