r32221 - in /branches/upstream/libterm-readline-gnu-perl/current: Gnu.pm INSTALL META.yml Makefile.PL README t/00checkver.t t/readline.t
ryan52-guest at users.alioth.debian.org
ryan52-guest at users.alioth.debian.org
Sat Mar 21 01:50:35 UTC 2009
Author: ryan52-guest
Date: Sat Mar 21 01:50:06 2009
New Revision: 32221
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=32221
Log:
[svn-upgrade] Integrating new upstream version, libterm-readline-gnu-perl (1.19)
Modified:
branches/upstream/libterm-readline-gnu-perl/current/Gnu.pm
branches/upstream/libterm-readline-gnu-perl/current/INSTALL
branches/upstream/libterm-readline-gnu-perl/current/META.yml
branches/upstream/libterm-readline-gnu-perl/current/Makefile.PL
branches/upstream/libterm-readline-gnu-perl/current/README
branches/upstream/libterm-readline-gnu-perl/current/t/00checkver.t
branches/upstream/libterm-readline-gnu-perl/current/t/readline.t
Modified: branches/upstream/libterm-readline-gnu-perl/current/Gnu.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libterm-readline-gnu-perl/current/Gnu.pm?rev=32221&op=diff
==============================================================================
--- branches/upstream/libterm-readline-gnu-perl/current/Gnu.pm (original)
+++ branches/upstream/libterm-readline-gnu-perl/current/Gnu.pm Sat Mar 21 01:50:06 2009
@@ -1,7 +1,7 @@
#
# Gnu.pm --- The GNU Readline/History Library wrapper module
#
-# $Id: Gnu.pm,v 1.98 2009/02/27 12:46:45 hiroo Exp $
+# $Id: Gnu.pm,v 1.100 2009/03/20 16:33:25 hiroo Exp $
#
# Copyright (c) 2009 Hiroo Hayashi. All rights reserved.
#
@@ -73,7 +73,7 @@
use DynaLoader;
use vars qw($VERSION @ISA @EXPORT_OK);
- $VERSION = '1.18';
+ $VERSION = '1.19';
# Term::ReadLine::Gnu::AU makes a function in
# `Term::ReadLine::Gnu::XS' as a method.
@@ -291,6 +291,11 @@
sub readline { # should be ReadLine
my $self = shift;
my ($prompt, $preput) = @_;
+
+ # contributed fix for Perl debugger
+ # make sure the outstream fd inside the readline library is
+ # in sync (see http://bugs.debian.org/236018)
+ $Attribs{outstream} = $Attribs{outstream};
# ornament support (now prompt only)
$prompt = ${$Attribs{term_set}}[0] . $prompt . ${$Attribs{term_set}}[1];
Modified: branches/upstream/libterm-readline-gnu-perl/current/INSTALL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libterm-readline-gnu-perl/current/INSTALL?rev=32221&op=diff
==============================================================================
--- branches/upstream/libterm-readline-gnu-perl/current/INSTALL (original)
+++ branches/upstream/libterm-readline-gnu-perl/current/INSTALL Sat Mar 21 01:50:06 2009
@@ -1,5 +1,5 @@
-*- Indented-text -*-
-# $Id: INSTALL,v 1.22 2006-04-02 02:11:51+09 hiroo Exp $
+# $Id: INSTALL,v 1.23 2009/03/20 16:06:37 hiroo Exp $
1. How to Install Term::ReadLine::Gnu
@@ -38,7 +38,17 @@
directory?' (This section is found in the Perl 5.6
documentation).
-1.3 Trouble Shooting
+1.3 Known Issue - Segmentation Fault during exiting Perl.
+
+ If "make test" fails even though all test passed, try
+ perl -Mblib t/00checkver.t
+ If segmentation fault occurs after all test done, if encounter
+ the putenv() bug. You have to recompile Perl with
+ -DPERL_USE_SAFE_PUTENV. See
+ http://rt.cpan.org/Ticket/Display.html?id=37194
+ for more details.
+
+1.4 Trouble Shooting
If you have any trouble when using or installing this module,
please let me (hiroo.hayashi at computer.org) know by E-Mail. It
@@ -86,6 +96,8 @@
see INSTALL file which is included in Term-ReadLine-Gnu-1.11.
2.2 Shared Library
+ !!!Description in this section is old. See document in the GNU
+ Readline Library.!!!
If you want to build it as shared library, use readline-4.0
(or later). Type `make shared' instead of `make' to build
@@ -104,16 +116,4 @@
# Please let me know on your experience on others OSs.
-2.3 Multibyte Character (Japanese character) Handling
-
- # readline-4.3 on some system has multibyte support. If your
- # system supports it, ignore this section.
-
- Since the GNU Readline Library is 8 bit clean, I use Japanese
- characters without any patch. But I have to hit Backspace key
- twice to erase a Japanese character.
-
- If you are using EUC Japanese charactor try to use
- Gnu/euc_jp.pm module.
-
EOF
Modified: branches/upstream/libterm-readline-gnu-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libterm-readline-gnu-perl/current/META.yml?rev=32221&op=diff
==============================================================================
--- branches/upstream/libterm-readline-gnu-perl/current/META.yml (original)
+++ branches/upstream/libterm-readline-gnu-perl/current/META.yml Sat Mar 21 01:50:06 2009
@@ -1,7 +1,7 @@
# http://module-build.sourceforge.net/META-spec.html
#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX#
name: Term-ReadLine-Gnu
-version: 1.18
+version: 1.19
version_from: Gnu.pm
installdirs: site
requires:
Modified: branches/upstream/libterm-readline-gnu-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libterm-readline-gnu-perl/current/Makefile.PL?rev=32221&op=diff
==============================================================================
--- branches/upstream/libterm-readline-gnu-perl/current/Makefile.PL (original)
+++ branches/upstream/libterm-readline-gnu-perl/current/Makefile.PL Sat Mar 21 01:50:06 2009
@@ -1,7 +1,7 @@
#
# Makefile.PL for Term::ReadLine::Gnu
#
-# $Id: Makefile.PL,v 1.31 2009/02/27 13:30:47 hiroo Exp $
+# $Id: Makefile.PL,v 1.32 2009/03/01 02:57:15 hiroo Exp $
#
# Copyright (c) 2009 Hiroo Hayashi. All rights reserved.
# <hiroo.hayashi at computer.org>
@@ -21,12 +21,17 @@
use ExtUtils::MakeMaker;
use Config;
use Getopt::Long;
-
+use 5.007; use 5.7.0; # use version 1.09 for older Perl
my ($defs, $libs, $lddflags, $RLLIB, $RLINC);
-# exit 0 before creating the Makefile to be CPAN Tests friendly
-# see http://cpantest.grango.org/wiki/CPANAuthorNotes
+# exit 0 before creating the Makefile to be CPAN Testers friendly
+# see http://wiki.cpantester.org/wiki/CPANAuthorNotes
my $err = $ENV{AUTOMATED_TESTING} ? 0 : 1;
+# test /dev/tty for CPAN Testers
+if ($ENV{AUTOMATED_TESTING} && !open(SESAMI, '/dev/tty')) {
+ warn "cannot open /dev/tty\n";
+ exit 0;
+}
$defs = ($Config{strings} =~ m|/string.h$|) ? '-DHAVE_STRING_H' : '';
Modified: branches/upstream/libterm-readline-gnu-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libterm-readline-gnu-perl/current/README?rev=32221&op=diff
==============================================================================
--- branches/upstream/libterm-readline-gnu-perl/current/README (original)
+++ branches/upstream/libterm-readline-gnu-perl/current/README Sat Mar 21 01:50:06 2009
@@ -1,5 +1,5 @@
-*- Indented-text -*-
-$Id: README,v 1.28 2009/02/27 13:31:39 hiroo Exp $
+$Id: README,v 1.29 2009/03/20 16:37:36 hiroo Exp $
Term::ReadLine::Gnu --- GNU Readline Library Wrapper Module
@@ -65,6 +65,18 @@
Revision History:
+
+1.19 2009-03-21
+ - make sure the outstream fd inside the readline library is in
+ sync (see http://bugs.debian.org/236018)
+ - fixes to be more CPAN Testers friendly
+ - t/readline.t does not use visible bell for "make test"
+ - Makefile.PL requires perl 5.7.0 or later. (Use
+ Term::ReadLine::Gnu-1.09 for older Perl.)
+ - Makefile.PL exits 0 when /dev/tty cannot be opened.
+ - INSTALL
+ add description of the -DPERL_USE_SAFE_PUTENV issue. If
+ you encounter a segmentation fault, read it.
1.18 2009-02-27
- better error checking of Makefile.PL for automatic testing
Modified: branches/upstream/libterm-readline-gnu-perl/current/t/00checkver.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libterm-readline-gnu-perl/current/t/00checkver.t?rev=32221&op=diff
==============================================================================
--- branches/upstream/libterm-readline-gnu-perl/current/t/00checkver.t (original)
+++ branches/upstream/libterm-readline-gnu-perl/current/t/00checkver.t Sat Mar 21 01:50:06 2009
@@ -1,9 +1,9 @@
# -*- perl -*-
# 00check.t - check versions
#
-# $Id: 00checkver.t,v 1.1 2008-03-20 22:50:26+09 hiroo Exp hiroo $
+# $Id: 00checkver.t,v 1.2 2009/02/27 14:16:14 hiroo Exp $
#
-# Copyright (c) 2008 Hiroo Hayashi. All rights reserved.
+# Copyright (c) 2009 Hiroo Hayashi. All rights reserved.
#
# This program is free software; you can redistribute it and/or
# modify it under the same terms as Perl itself.
Modified: branches/upstream/libterm-readline-gnu-perl/current/t/readline.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libterm-readline-gnu-perl/current/t/readline.t?rev=32221&op=diff
==============================================================================
--- branches/upstream/libterm-readline-gnu-perl/current/t/readline.t (original)
+++ branches/upstream/libterm-readline-gnu-perl/current/t/readline.t Sat Mar 21 01:50:06 2009
@@ -1,7 +1,7 @@
# -*- perl -*-
# readline.t - Test script for Term::ReadLine:GNU
#
-# $Id: readline.t,v 1.45 2008-02-17 15:26:31+09 hiroo Exp $
+# $Id: readline.t,v 1.46 2009-03-20 23:17:27+09 hiroo Exp $
#
# Copyright (c) 2008 Hiroo Hayashi. All rights reserved.
#
@@ -866,7 +866,9 @@
print $OUT "\n" unless defined $t->readline("bold>");
$t->ornaments('mr,me,,');
print $OUT "\n" unless defined $t->readline("reverse>");
-$t->ornaments('vb,,,');
+# It seems that on some systems a visible bell cannot be redirected
+# to /dev/null and confuses ExtUtils::Command:MM::test_harness().
+$t->ornaments('vb,,,') if $verbose;
print $OUT "\n" unless defined $t->readline("visible bell>");
$t->ornaments(0);
print $OUT "# end of ornaments test\n";
@@ -876,10 +878,9 @@
########################################################################
# end of non-interactive test
unless ($verbose) {
- # $^X : `perl' for dynamically linked perl, `./perl' for
- # statically linked perl.
+ # Be quiet during CPAN Testers testing.
print STDERR "ok\tTry \`$^X -Mblib t/readline.t verbose\', if you will.\n"
- if $ok;
+ if ($ok && !$ENV{AUTOMATED_TESTING});
exit 0;
}
undef $a->{getc_function};
More information about the Pkg-perl-cvs-commits
mailing list