gnu: Add perl-term-readline-gnu.

* gnu/packages/perl.scm (perl-term-readline-gnu): New variable.
This commit is contained in:
Eric Bavier 2019-12-07 21:45:53 -06:00
parent 32dad069b0
commit ccb6b98bfe
No known key found for this signature in database
GPG key ID: FD73CAC719D32566

View file

@ -52,10 +52,12 @@ (define-module (gnu packages perl)
#:use-module (gnu packages compression)
#:use-module (gnu packages freedesktop)
#:use-module (gnu packages less)
#:use-module (gnu packages ncurses)
#:use-module (gnu packages perl-check)
#:use-module (gnu packages perl-compression)
#:use-module (gnu packages perl-web)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages readline)
#:use-module (gnu packages textutils))
;;;
@ -8491,6 +8493,40 @@ (define-public perl-term-readkey
screen size, and retrieval/modification of the control characters.")
(license (package-license perl))))
(define-public perl-term-readline-gnu
(package
(name "perl-term-readline-gnu")
(version "1.36")
(source
(origin
(method url-fetch)
(uri (string-append "mirror://cpan/authors/id/H/HA/HAYASHI/"
"Term-ReadLine-Gnu-" version ".tar.gz"))
(sha256
(base32
"09b9mcmp09kdfh5jaqdr528yny8746hvn3f185aqd6rw06jgf24s"))))
(build-system perl-build-system)
(inputs
`(("readline" ,readline)
("ncurses" ,ncurses)))
(arguments
`(#:tests? #f ; Tests fail without other Term::ReadLine interfaces present
#:phases (modify-phases %standard-phases
(add-before 'configure 'patch-search-lib
(lambda _
(substitute* "Makefile.PL"
;; The configuration provides no way to pass
;; additional directories to search for the ncurses
;; library, so just skip the search.
(("&search_lib\\('-lncurses'\\)") "'-lncurses'")))))))
(home-page "https://metacpan.org/release/Term-ReadLine-Gnu")
(synopsis "GNU Readline/History Library interface for Perl")
(description "This module implements an interface to the GNU Readline
library. It gives you input line editing facilities, input history management
facilities, completion facilities, etc. Term::ReadLine::Gnu is upwards
compatible with Term::ReadLine.")
(license (package-license perl))))
(define-public perl-term-size-any
(package
(name "perl-term-size-any")