TakeV/guix
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

gnu: checkpolicy: Remove input labels.

Browse source 
* gnu/packages/selinux.scm (checkpolicy)[arguments]: Use G-expression &
SERACH-INPUT-FILE.
[native-inputs, inputs]: Remove labels.
This commit is contained in:
Marius Bakke 2022-08-13 13:37:33 +02:00
parent 0d79288fb6
commit 86084aa4c8
No known key found for this signature in database
GPG key ID: A2A06DF2A33A54FA
1 changed files with 17 additions and 17 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

34
gnu/packages/selinux.scm
View file

@ -23,6 +23,7 @@
(define-module (gnu packages selinux)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix packages)
#:use-module (guix gexp)
#:use-module (guix download)
#:use-module (guix git-download)
#:use-module (guix utils)
@ -100,25 +101,24 @@ (define-public checkpolicy
(package/inherit libsepol
(name "checkpolicy")
(arguments
`(#:tests? #f ; there is no check target
#:make-flags
(let ((out (assoc-ref %outputs "out")))
(list (string-append "PREFIX=" out)
(string-append "LIBSEPOLA="
(assoc-ref %build-inputs "libsepol")
"/lib/libsepol.a")
(string-append "CC=" ,(cc-for-target))))
#:phases
(modify-phases %standard-phases
(delete 'configure)
(delete 'portability)
(add-after 'unpack 'enter-dir
(lambda _ (chdir ,name))))))
(list
#:tests? #f ; there is no check target
#:make-flags
#~(list (string-append "PREFIX=" #$output)
(string-append "LIBSEPOLA="
(search-input-file %build-inputs
"/lib/libsepol.a"))
(string-append "CC=" #$(cc-for-target)))
#:phases
#~(modify-phases %standard-phases
(delete 'configure)
(delete 'portability)
(add-after 'unpack 'enter-dir
(lambda _ (chdir #$name))))))
(inputs
`(("libsepol" ,libsepol)))
(list libsepol))
(native-inputs
`(("bison" ,bison)
("flex" ,flex)))
(list bison flex))
(synopsis "Check SELinux security policy configurations and modules")
(description
"This package provides the tools \"checkpolicy\" and \"checkmodule\".