ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-03 18:09:18 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: earlyoom: Rewrite with gexps.

Browse source 
* gnu/packages/linux.scm (earlyoom)[arguments]: Rewrite with gexps.
This commit is contained in:
Efraim Flashner 2022-01-13 14:43:13 +02:00
parent 130703f8c5
commit 720baa1e0b
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351
1 changed files with 19 additions and 20 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

39
gnu/packages/linux.scm
View file

@ -3735,26 +3735,25 @@ (define-public earlyoom
"16iyn51xlrsbshc7p5xl2338yyfzknaqc538sa7mamgccqwgyvvq")))) "16iyn51xlrsbshc7p5xl2338yyfzknaqc538sa7mamgccqwgyvvq"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:phases (list
(modify-phases %standard-phases #:phases
(delete 'configure) ; no configure script #~(modify-phases %standard-phases
(add-before 'check 'set-go-HOME (delete 'configure) ; no configure script
(lambda _ (add-before 'check 'set-go-HOME
(setenv "HOME" (getcwd)) (lambda _
#t)) (setenv "HOME" (getcwd))))
(add-before 'check 'disable-failing-test (add-before 'check 'disable-failing-test
(lambda _ (lambda _
;; This test relies on writing to /proc/%d/oom_score_adj. ;; This test relies on writing to /proc/%d/oom_score_adj.
(substitute* "testsuite_cli_test.go" (substitute* "testsuite_cli_test.go"
(("TestI" match) (("TestI" match)
(string-append "skipped" match))) (string-append "skipped" match))))))
#t))) #:make-flags
#:make-flags (let* ((prefix (assoc-ref %outputs "out"))) #~(list (string-append "CC=" #$(cc-for-target))
(list ,(string-append "CC=" (cc-for-target)) (string-append "VERSION=v" #$version)
(string-append "VERSION=v" ,version) (string-append "PREFIX=" #$output)
(string-append "PREFIX=" prefix) (string-append "SYSCONFDIR=" #$output "/etc")
(string-append "SYSCONFDIR=" prefix "/etc") "GO111MODULE=off")
"GO111MODULE=off"))
#:test-target "test")) #:test-target "test"))
(native-inputs (native-inputs
(list (list