12/36: gnu: criu: Delete static libraries.

[guix-commits]

nckx pushed a commit to branch master
in repository guix.

commit a47ce1e0e7d4c5aa3f954cb97f0c4cbb5a6039e2
Author: Tobias Geerinckx-Rice <me@tobias.gr>
AuthorDate: Sun Oct 3 23:52:39 2021 +0200

    gnu: criu: Delete static libraries.
    
    * gnu/packages/virtualization.scm (criu)[arguments]:
    Add a new 'delete-static-libraries phase.
---
 gnu/packages/virtualization.scm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/virtualization.scm b/gnu/packages/virtualization.scm
index ca922ef..5626eaa 100644
--- a/gnu/packages/virtualization.scm
+++ b/gnu/packages/virtualization.scm
@@ -1623,7 +1623,12 @@ domains, their live performance and resource utilization 
statistics.")
                                          "/site-packages:"
                                          (getenv "PYTHONPATH"))))
                (wrap-program (string-append out "/bin/crit")
-                 `("PYTHONPATH" ":" prefix (,path)))))))))
+                 `("PYTHONPATH" ":" prefix (,path))))))
+         (add-after 'install 'delete-static-libraries
+           ;; Not building/installing these at all doesn't seem to be 
supported.
+           (lambda* (#:key outputs #:allow-other-keys)
+             (let ((out (assoc-ref outputs "out")))
+               (for-each delete-file (find-files out "\\.a$"))))))))
     (inputs
      `(("protobuf" ,protobuf)
        ("python" ,python-2)