From 415cbd9e3f74a3ff23bf95f46826376aed64b5a5 Mon Sep 17 00:00:00 2001 From: anemofilia Date: Thu, 10 Aug 2023 09:36:29 -0300 Subject: [PATCH] style: remove use of (pipe) module in (radix system setuid) module --- modules/radix/system/setuid.scm | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/modules/radix/system/setuid.scm b/modules/radix/system/setuid.scm index bccf916..8b9833f 100644 --- a/modules/radix/system/setuid.scm +++ b/modules/radix/system/setuid.scm @@ -1,5 +1,4 @@ (define-module (radix system setuid) - #:use-module (pipe) #:use-module (ice-9 match) #:use-module (radix utils) #:use-module (gnu system setuid) @@ -9,7 +8,7 @@ (map-setuid-programs (package package-programs) clause ...) (map (match-lambda ((package-program . package) (setuid-program - (program (->> package-program - (string-append "/bin/") - (file-append package)))))) + (program + (file-append package + (string-append "/bin/" package-program)))))) (associate-right (package package-programs) clause ...)))