mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 21:38:07 -05:00
gnu: subversion: Install Perl bindings.
* gnu/packages/version-control.scm (subversion): Add 'install-perl-bindings' phase.
This commit is contained in:
parent
832e64bdda
commit
8b2fe7853d
1 changed files with 26 additions and 1 deletions
|
@ -38,7 +38,8 @@ (define-module (gnu packages version-control)
|
||||||
#:use-module (gnu packages system)
|
#:use-module (gnu packages system)
|
||||||
#:use-module (gnu packages xml)
|
#:use-module (gnu packages xml)
|
||||||
#:use-module (gnu packages emacs)
|
#:use-module (gnu packages emacs)
|
||||||
#:use-module (gnu packages compression))
|
#:use-module (gnu packages compression)
|
||||||
|
#:use-module (gnu packages swig))
|
||||||
|
|
||||||
(define-public bazaar
|
(define-public bazaar
|
||||||
(package
|
(package
|
||||||
|
@ -124,6 +125,30 @@ (define-public subversion
|
||||||
(base32
|
(base32
|
||||||
"11inl9n1riahfnbk1fax0dysm2swakzhzhpmm2zvga6fikcx90zw"))))
|
"11inl9n1riahfnbk1fax0dysm2swakzhzhpmm2zvga6fikcx90zw"))))
|
||||||
(build-system gnu-build-system)
|
(build-system gnu-build-system)
|
||||||
|
(arguments
|
||||||
|
'(#:phases (alist-cons-after
|
||||||
|
'install 'instal-perl-bindings
|
||||||
|
(lambda* (#:key outputs #:allow-other-keys)
|
||||||
|
;; Follow the instructions from
|
||||||
|
;; 'subversion/bindings/swig/INSTALL'.
|
||||||
|
(let ((out (assoc-ref outputs "out")))
|
||||||
|
(and (zero? (system* "make" "swig-pl-lib"))
|
||||||
|
;; FIXME: Test failures.
|
||||||
|
;; (zero? (system* "make" "check-swig-pl"))
|
||||||
|
(zero? (system* "make" "install-swig-pl-lib"))
|
||||||
|
|
||||||
|
;; Set the right installation prefix.
|
||||||
|
(with-directory-excursion
|
||||||
|
"subversion/bindings/swig/perl/native"
|
||||||
|
(and (zero?
|
||||||
|
(system* "perl" "Makefile.PL"
|
||||||
|
(string-append "PREFIX=" out)))
|
||||||
|
(zero?
|
||||||
|
(system* "make" "install")))))))
|
||||||
|
%standard-phases)))
|
||||||
|
(native-inputs
|
||||||
|
;; For the Perl bindings.
|
||||||
|
`(("swig" ,swig)))
|
||||||
(inputs
|
(inputs
|
||||||
`(("apr" ,apr)
|
`(("apr" ,apr)
|
||||||
("apr-util" ,apr-util)
|
("apr-util" ,apr-util)
|
||||||
|
|
Loading…
Reference in a new issue