ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-24 21:38:07 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: policycoreutils: Use G-expression.

Browse source 
* gnu/packages/selinux.scm (policycoreutils)[arguments]: Convert to gexp.
This commit is contained in:
Marius Bakke 2022-08-13 14:13:10 +02:00
parent d7278e4020
commit e015fc174e
No known key found for this signature in database
GPG key ID: A2A06DF2A33A54FA
1 changed files with 38 additions and 37 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

75
gnu/packages/selinux.scm
View file

@ -354,43 +354,44 @@ (define-public policycoreutils
(package/inherit libsepol (package/inherit libsepol
(name "policycoreutils") (name "policycoreutils")
(arguments (arguments
`(#:test-target "test" (list
#:make-flags #:test-target "test"
(let ((out (assoc-ref %outputs "out"))) #:make-flags
(list (string-append "CC=" ,(cc-for-target)) #~(let ((out #$output))
(string-append "PREFIX=" out) (list (string-append "CC=" #$(cc-for-target))
(string-append "LOCALEDIR=" out "/share/locale") (string-append "PREFIX=" out)
(string-append "BASHCOMPLETIONDIR=" out (string-append "LOCALEDIR=" out "/share/locale")
"/share/bash-completion/completions") (string-append "BASHCOMPLETIONDIR=" out
"INSTALL=install -c -p" "/share/bash-completion/completions")
"INSTALL_DIR=install -d" "INSTALL=install -c -p"
;; These ones are needed because some Makefiles define the "INSTALL_DIR=install -d"
;; directories relative to DESTDIR, not relative to PREFIX. ;; These ones are needed because some Makefiles define the
(string-append "SBINDIR=" out "/sbin") ;; directories relative to DESTDIR, not relative to PREFIX.
(string-append "ETCDIR=" out "/etc") (string-append "SBINDIR=" out "/sbin")
(string-append "SYSCONFDIR=" out "/etc/sysconfig") (string-append "ETCDIR=" out "/etc")
(string-append "MAN5DIR=" out "/share/man/man5") (string-append "SYSCONFDIR=" out "/etc/sysconfig")
(string-append "INSTALL_NLS_DIR=" out "/share/locale") (string-append "MAN5DIR=" out "/share/man/man5")
(string-append "AUTOSTARTDIR=" out "/etc/xdg/autostart") (string-append "INSTALL_NLS_DIR=" out "/share/locale")
(string-append "DBUSSERVICEDIR=" out "/share/dbus-1/services") (string-append "AUTOSTARTDIR=" out "/etc/xdg/autostart")
(string-append "SYSTEMDDIR=" out "/lib/systemd") (string-append "DBUSSERVICEDIR=" out "/share/dbus-1/services")
(string-append "INITDIR=" out "/etc/rc.d/init.d") (string-append "SYSTEMDDIR=" out "/lib/systemd")
(string-append "SELINUXDIR=" out "/etc/selinux"))) (string-append "INITDIR=" out "/etc/rc.d/init.d")
#:phases (string-append "SELINUXDIR=" out "/etc/selinux")))
(modify-phases %standard-phases #:phases
(delete 'configure) #~(modify-phases %standard-phases
(add-after 'unpack 'enter-dir (delete 'configure)
(lambda _ (chdir ,name))) (add-after 'unpack 'enter-dir
(add-after 'enter-dir 'ignore-/usr-tests (lambda _ (chdir #$name)))
(lambda* (#:key inputs #:allow-other-keys) (add-after 'enter-dir 'ignore-/usr-tests
;; Rewrite lookup paths for header files. (lambda* (#:key inputs #:allow-other-keys)
(substitute* '("newrole/Makefile" ;; Rewrite lookup paths for header files.
"setfiles/Makefile" (substitute* '("newrole/Makefile"
"run_init/Makefile") "setfiles/Makefile"
(("/usr(/include/security/pam_appl.h)" _ file) "run_init/Makefile")
(search-input-file inputs file)) (("/usr(/include/security/pam_appl.h)" _ file)
(("/usr(/include/libaudit.h)" _ file) (search-input-file inputs file))
(search-input-file inputs file)))))))) (("/usr(/include/libaudit.h)" _ file)
(search-input-file inputs file))))))))
(inputs (inputs
(list audit (list audit
linux-pam linux-pam