gnu: git: Add input perl-term-readkey for 'git-svn'.

* gnu/packages/version-control.scm (git)[inputs]: Add perl-term-readkeys.
[arguments]: Add perl-term-readkeys to the PERL5LIB of `git-svn'.

Signed-off-by: 宋文武 <iyzsong@gmail.com>
This commit is contained in:
Thomas Danckaert 2016-09-27 15:38:51 +02:00 committed by 宋文武
parent 11e296ef30
commit b411517a19
No known key found for this signature in database
GPG Key ID: 26525665AE727D37
1 changed files with 5 additions and 3 deletions

View File

@ -143,6 +143,7 @@ as well as the classic centralized workflow.")
;; For 'git-svn'. ;; For 'git-svn'.
("subversion" ,subversion) ("subversion" ,subversion)
("perl-term-readkey" ,perl-term-readkey)
;; For 'git-send-email' ;; For 'git-send-email'
("perl-authen-sasl" ,perl-authen-sasl) ("perl-authen-sasl" ,perl-authen-sasl)
@ -227,14 +228,15 @@ as well as the classic centralized workflow.")
(list gitk git-gui git-cit git-se git-svn) (list gitk git-gui git-cit git-se git-svn)
(list gitk* git-gui* git-cit* git-se* git-svn*)) (list gitk* git-gui* git-cit* git-se* git-svn*))
;; Tell 'git-svn' where Subversion is. ;; Tell 'git-svn' where Subversion and perl-term-readkey are.
(wrap-program git-svn* (wrap-program git-svn*
`("PATH" ":" prefix `("PATH" ":" prefix
(,(string-append (assoc-ref inputs "subversion") (,(string-append (assoc-ref inputs "subversion")
"/bin"))) "/bin")))
`("PERL5LIB" ":" prefix `("PERL5LIB" ":" prefix
(,(string-append (assoc-ref inputs "subversion") ,(map (lambda (i) (string-append (assoc-ref inputs i)
"/lib/perl5/site_perl"))) "/lib/perl5/site_perl"))
'("subversion" "perl-term-readkey")))
;; XXX: The .so for SVN/Core.pm lacks a RUNPATH, so ;; XXX: The .so for SVN/Core.pm lacks a RUNPATH, so
;; help it find 'libsvn_client-1.so'. ;; help it find 'libsvn_client-1.so'.