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: tomb: Use system's sudo.

Browse source 
* gnu/packages/crypto.scm (tomb)[arguments]: Disallow references to the "sudo"
input.  Remove it's path from the wrapper.
This commit is contained in:
Eric Bavier 2019-11-15 11:02:13 -06:00
parent 417df5bb57
commit 257e63044f
No known key found for this signature in database
GPG key ID: FD73CAC719D32566
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
gnu/packages/crypto.scm
View file

@ -365,6 +365,10 @@ (define-public tomb
("util-linux" ,util-linux))) ("util-linux" ,util-linux)))
(arguments (arguments
`(#:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out"))) `(#:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out")))
;; The "sudo" input is needed only to satisfy dependency checks in the
;; 'check' phase. The "sudo" used at runtime should come from the
;; system's setuid-programs, so ensure no reference is kept.
#:disallowed-references (,sudo)
;; TODO: Build and install gtk and qt trays ;; TODO: Build and install gtk and qt trays
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
@ -383,7 +387,7 @@ (define-public tomb
,@(map (lambda (program) ,@(map (lambda (program)
(or (and=> (which program) dirname) (or (and=> (which program) dirname)
(error "program not found:" program))) (error "program not found:" program)))
'("seq" "mkfs.ext4" "pinentry" "sudo" '("seq" "mkfs.ext4" "pinentry"
"gpg" "cryptsetup" "gettext" "lsof" "gpg" "cryptsetup" "gettext" "lsof"
"qrencode" "steghide" "findmnt"))))) "qrencode" "steghide" "findmnt")))))
#t))) #t)))