diff options
author | V3n3RiX <venerix@redcorelinux.org> | 2018-03-09 16:53:27 +0000 |
---|---|---|
committer | V3n3RiX <venerix@redcorelinux.org> | 2018-03-09 16:53:27 +0000 |
commit | 80208fb578cf92cc308906660ca6d7860c6b2a1f (patch) | |
tree | 6f06818031b553c506fc10dfe9908a835df288aa /dev-perl/Term-ReadLine-TTYtter | |
parent | 06a7b5647e11a8ddf69b1c3d3ded6a8ba28b923e (diff) |
gentoo resync : 09.03.2018
Diffstat (limited to 'dev-perl/Term-ReadLine-TTYtter')
4 files changed, 119 insertions, 13 deletions
diff --git a/dev-perl/Term-ReadLine-TTYtter/Manifest b/dev-perl/Term-ReadLine-TTYtter/Manifest index c56f6b8de504..405d7b027b87 100644 --- a/dev-perl/Term-ReadLine-TTYtter/Manifest +++ b/dev-perl/Term-ReadLine-TTYtter/Manifest @@ -1,3 +1,5 @@ +AUX Term-ReadLine-TTYtter-1.4-nointeractive.patch 2438 BLAKE2B 1ea21dfd1601f5da349a25f274de4bb937e83aa49ed8c26f21ca2414e1ad51f4c40d408d929b68e096c49b0a6430f8a80fb2edd289fbd566508de24699972adb SHA512 7d0676503454f46df59e5e1b6ff6c8f63a31df949dd1ca13198c4ad5bc837bdf97bc1f44a04a43e2461e84d086c824623dea34d2f30aeb2d2e5342bc2d07132e DIST Term-ReadLine-TTYtter-1.4.tar.gz 52093 BLAKE2B 47194ed428729bf97d8337731b25ac0164cfe9f853854b5e2aad6936f7ed34fa8552bffc150ef405f97947a63cc12259634c5b084c21653c03b6c41af61c6e3e SHA512 6e49c78a935259e99cabe5c9750fd5e90e205c754955d23c50227bbfe3dcb40d56ccc447d3f516ff34195d3fb411b13ae61a6c32c776231f794d2fca9da8fd1a EBUILD Term-ReadLine-TTYtter-1.4.ebuild 345 BLAKE2B a2fd0dd82434af406a71ac231b8cbeef0173ea84835acf60843e6ddd0a187d3b98cc5d2e091ec981b904b04a92198b7556cb3945afe01d2737c57782cc9a38ce SHA512 ab4e16588ebe81df1dc49eea51a416dba32c42da861c72072b1fa38af237585d68a4b49f03fc46b185683fd11e40845dfe4f9a8acdc803869118b15242431c1c -MISC metadata.xml 458 BLAKE2B 70294cf90d8c9e95a9921f6501bb505310dd130f1416f6492cd824de5c648e4c80cf3cddd9e714ccf8cdd28e0e276263c913a2b9e299db8bed9ece37cf5d1b6a SHA512 9abcee68c04a5e79c7247af3f86a9b67372edc51b5a23444dbb061bdf9e78531456a615f3dcac202b9599e92a8e849a41540faa9c10c3bb9d5a5ddbd5581e6a5 +EBUILD Term-ReadLine-TTYtter-1.400.0-r1.ebuild 373 BLAKE2B d67cf6d069546b43a76c4e4d31389b0b6a3fdafc95b238c9baf966a6cc04dd904906ad58b0674c2a638714e7bdce5ede2cdd089cfce302545abf3ac97e467083 SHA512 62f4e506f220eec159a2788d147ee44b2d6f406c45647e8ab51e131cae46a9a994e9f5e5354aa73d3bdf6e079c8804232470020871d3e0cb3c9247dbfbd343ba +MISC metadata.xml 909 BLAKE2B 282901ae74553c3f2b842fcd26a9b8092b0209c908f18e6d4e09742952a8ce591f302b54d2950c9a4a3162b279e82d26a3120f2165856244f4fe074eb98e99b4 SHA512 a109c56b55ac6fc9fd1c9aac5ec66e3d492eea7972c5f7f57e2ff5378b495dfffd28d689b2ae7562a4dc8fdf2c31baf2a89850040c4a7ffd393c3252fc051d97 diff --git a/dev-perl/Term-ReadLine-TTYtter/Term-ReadLine-TTYtter-1.400.0-r1.ebuild b/dev-perl/Term-ReadLine-TTYtter/Term-ReadLine-TTYtter-1.400.0-r1.ebuild new file mode 100644 index 000000000000..4ff8c3144302 --- /dev/null +++ b/dev-perl/Term-ReadLine-TTYtter/Term-ReadLine-TTYtter-1.400.0-r1.ebuild @@ -0,0 +1,18 @@ +# Copyright 1999-2018 Gentoo Foundation +# Distributed under the terms of the GNU General Public License v2 + +EAPI=6 + +DIST_AUTHOR=CKAISER +DIST_VERSION=1.4 + +inherit perl-module + +DESCRIPTION="Quick implementation of readline utilities for ttytter" + +SLOT="0" +KEYWORDS="~amd64 ~x86" +IUSE="" + +PATCHES=( "${FILESDIR}/${PN}-1.4-nointeractive.patch" ) +RDEPEND="dev-perl/TermReadKey" diff --git a/dev-perl/Term-ReadLine-TTYtter/files/Term-ReadLine-TTYtter-1.4-nointeractive.patch b/dev-perl/Term-ReadLine-TTYtter/files/Term-ReadLine-TTYtter-1.4-nointeractive.patch new file mode 100644 index 000000000000..81050510252b --- /dev/null +++ b/dev-perl/Term-ReadLine-TTYtter/files/Term-ReadLine-TTYtter-1.4-nointeractive.patch @@ -0,0 +1,78 @@ +From ec0b1fd3853df6cb577a99382cbcfd7ecc85d372 Mon Sep 17 00:00:00 2001 +From: Kent Fredric <kentnl@gentoo.org> +Date: Wed, 28 Feb 2018 09:50:13 +1300 +Subject: Use file for input data instead of STDIN ( non-interactive testing ) + +test.pl as-is is useless because it executes no readline code when in +automated testing conditions. + +Additionally, attempting to use the built-in file redirection +mechanisms is useless, as there's no way to set those parts from + + make test + +And 'preput' support causes readline to barf when the input stream +is not a real TTY. + +Subsequently, the pre-inserted "exit" also has to be removed. + +Bug: https://bugs.gentoo.org/624044 +--- + t/input.txt | 2 ++ + test.pl | 23 +++-------------------- + 2 files changed, 5 insertions(+), 20 deletions(-) + create mode 100644 t/input.txt + +diff --git a/t/input.txt b/t/input.txt +new file mode 100644 +index 0000000..6077553 +--- /dev/null ++++ b/t/input.txt +@@ -0,0 +1,2 @@ ++printf "input ok: sqrt(42)^2 == %20.20f", sqrt(42) * sqrt(42); ++exit 0 +diff --git a/test.pl b/test.pl +index fe99e2f..1f87749 100644 +--- a/test.pl ++++ b/test.pl +@@ -10,26 +10,9 @@ use Term::ReadLine; + use Carp; + $SIG{__WARN__} = sub { warn Carp::longmess(@_) }; + +-my $ev; +-if ($ENV{$ev = 'AUTOMATED_TESTING'} or $ENV{$ev = 'PERL_MM_NONINTERACTIVE'}) { +- print "1..0 # skip: \$ENV{$ev} is TRUE\n"; +- exit; +-} ++open(IN, '<', './t/input.txt') or die "Can't open input.txt, $@, $!"; ++$term = Term::ReadLine->new('Simple Perl calc', \*IN, \*STDOUT); + +-if (!@ARGV) { +- $term = new Term::ReadLine 'Simple Perl calc'; +-} elsif (@ARGV == 2) { +- open(IN,"<$ARGV[0]"); +- open(OUT,">$ARGV[1]"); +- $term = new Term::ReadLine 'Simple Perl calc', \*IN, \*OUT; +-} elsif ($ARGV[0] =~ m|^/dev|) { +- open(IN,"<$ARGV[0]"); +- open(OUT,">$ARGV[0]"); +- $term = new Term::ReadLine 'Simple Perl calc', \*IN, \*OUT; +-} else { +- $term = new Term::ReadLine 'Simple Perl calc', \*STDIN, \*STDOUT; +- $no_print = $ARGV[0] eq '--no-print'; +-} + $prompt = "Enter arithmetic or Perl expression: "; + if ((my $l = $ENV{PERL_RL_TEST_PROMPT_MINLEN} || 0) > length $prompt) { + $prompt =~ s/(?=:)/ ' ' x ($l - length $prompt)/e; +@@ -60,7 +43,7 @@ print $OUT <<EOP; + this word should be already entered.) + + EOP +-while ( defined ($_ = $term->readline($prompt, "exit")) ) { ++while ( defined ($_ = $term->readline($prompt)) ) { + $res = eval($_); + warn $@ if $@; + print $OUT $res, "\n" unless $@ or $no_print; +-- +2.15.1 + diff --git a/dev-perl/Term-ReadLine-TTYtter/metadata.xml b/dev-perl/Term-ReadLine-TTYtter/metadata.xml index 87b984b5eb8e..c1dbc5646cff 100644 --- a/dev-perl/Term-ReadLine-TTYtter/metadata.xml +++ b/dev-perl/Term-ReadLine-TTYtter/metadata.xml @@ -1,16 +1,24 @@ <?xml version="1.0" encoding="UTF-8"?> <!DOCTYPE pkgmetadata SYSTEM "http://www.gentoo.org/dtd/metadata.dtd"> <pkgmetadata> -<maintainer type="person"> -<email>gentoo@nephros.org</email> -<name>Peter Gantner</name> -</maintainer> -<maintainer type="project"> -<email>perl@gentoo.org</email> -<name>Gentoo Perl Project</name> -</maintainer> -<maintainer type="project"> -<email>proxy-maint@gentoo.org</email> -<name>Proxy Maintainers</name> -</maintainer> + <maintainer type="person"> + <email>gentoo@nephros.org</email> + <name>Peter Gantner</name> + </maintainer> + <maintainer type="project"> + <email>perl@gentoo.org</email> + <name>Gentoo Perl Project</name> + </maintainer> + <maintainer type="project"> + <email>proxy-maint@gentoo.org</email> + <name>Proxy Maintainers</name> + </maintainer> + <upstream> + <remote-id type="cpan">Term-ReadLine-TTYtter</remote-id> + <remote-id type="cpan-module">Term::ReadLine::TTYtter</remote-id> + <remote-id type="cpan-module">Term::ReadLine::TTYtter::AU</remote-id> + <remote-id type="cpan-module">Term::ReadLine::TTYtter::Compa</remote-id> + <remote-id type="cpan-module">Term::ReadLine::TTYtter::Tie</remote-id> + <remote-id type="cpan-module">readline_ttytter</remote-id> + </upstream> </pkgmetadata> |