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