ieure pushed a commit to branch master
in repository guix.

commit 4ba86fd308b1f64deda206235155e577e62025ec
Author: Rutherther <[email protected]>
AuthorDate: Sat Mar 22 18:00:22 2025 +0100

    gnu: tlp: Wrap sbin folder
    
    Seems that tlp recently introduced sbin
    folder, this has broken the wrapping for
    tlp script. The tlp script can fail in
    finding runtime dependencies.
    
    * gnu/packages/linux.scm (tlp): Wrap sbin folder
    
    Change-Id: Id006f21fb42e385dade732b9d237b045f3a863e7
    Signed-off-by: Ian Eure <[email protected]>
---
 gnu/packages/linux.scm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm
index c92829c50a..1417925dc8 100644
--- a/gnu/packages/linux.scm
+++ b/gnu/packages/linux.scm
@@ -8230,7 +8230,9 @@ interface in sysfs, which can be accomplished with the 
included udev rules.")
           (add-after 'install 'wrap
             (lambda* (#:key inputs outputs #:allow-other-keys)
               (let* ((bin (string-append (assoc-ref outputs "out") "/bin"))
-                     (bin-files (find-files bin ".*")))
+                     (sbin (string-append (assoc-ref outputs "out") "/sbin"))
+                     (bin-files (find-files bin ".*"))
+                     (sbin-files (find-files sbin ".*")))
                 (define (bin-directory input-name)
                   (let ((p (assoc-ref inputs input-name)))
                     (and p (string-append p "/bin"))))
@@ -8260,7 +8262,7 @@ interface in sysfs, which can be accomplished with the 
included udev rules.")
                                                 "pciutils"
                                                 "rfkill"
                                                 "wireless-tools"))))))
-                          bin-files)))))))
+                          (append bin-files sbin-files))))))))
     (home-page "https://linrunner.de/en/tlp/tlp.html";)
     (synopsis "Power management tool for Linux")
     (description "TLP is a power management tool for Linux.  It comes with

Reply via email to