ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-11-07 15:36:20 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: gitolite: Wrap programs instead of using propagated inputs.

Browse source 
* gnu/packages/version-control.scm (gitolite)[arguments]: Add git to wrapped
$PATH and additionally wrap gitolite-shell.
[inputs]: Add git and openssh.
[propagated-inputs]: Remove it.
This commit is contained in:
David Thompson 2022-09-02 14:33:01 -04:00
parent 8b3112a355
commit 1aa46a7e29
No known key found for this signature in database
GPG key ID: 8328C7470FF1D807
1 changed files with 8 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
gnu/packages/version-control.scm
View file

@ -1573,17 +1573,15 @@ (define-public gitolite
(coreutils (assoc-ref inputs "coreutils")) (coreutils (assoc-ref inputs "coreutils"))
(findutils (assoc-ref inputs "findutils")) (findutils (assoc-ref inputs "findutils"))
(git (assoc-ref inputs "git"))) (git (assoc-ref inputs "git")))
(wrap-program (string-append out "/bin/gitolite") (for-each (lambda (file-name)
`("PATH" ":" prefix (wrap-program (string-append out file-name)
,(map (lambda (dir) `("PATH" ":" prefix
(string-append dir "/bin")) ,(map (lambda (dir)
(list out coreutils findutils git)))))))))) (string-append dir "/bin"))
(list out coreutils findutils git)))))
'("/bin/gitolite" "/bin/gitolite-shell"))))))))
(inputs (inputs
(list bash-minimal perl coreutils findutils inetutils)) (list bash-minimal coreutils findutils git inetutils openssh perl))
;; git and openssh are propagated because trying to patch the source via
;; regexp matching is too brittle and prone to false positives.
(propagated-inputs
(list git openssh))
(home-page "https://gitolite.com") (home-page "https://gitolite.com")
(synopsis "Git access control layer") (synopsis "Git access control layer")
(description (description