Bug#895157: libterm-readline-gnu-perl: warning message when $TERM is unset

[Steve Langasek]

Package: libterm-readline-gnu-perl
Version: 1.35-3
Followup-For: Bug #895157

It appears that this also breaks the 'nama' autopkgtests on some
architectures in Ubuntu's environment, and it's much less straightforward to
work around it with setting TERM there since nama uses autodep8 for its test
generation.  Attached, please find an updated patch which lets
libterm-readline-gnu-perl work without error output when $TERM is unset.

-- 
Steve Langasek                   Give me a lever long enough and a Free OS
Debian Developer                   to set it on, and I can move the world.
Ubuntu Developer                                    http://www.debian.org/
slangasek at ubuntu.com                                     vorlon at debian.org
-------------- next part --------------
diff -Nru libterm-readline-gnu-perl-1.35/debian/patches/50dumbterm.patch libterm-readline-gnu-perl-1.35/debian/patches/50dumbterm.patch
--- libterm-readline-gnu-perl-1.35/debian/patches/50dumbterm.patch	2018-01-18 14:26:08.000000000 -0800
+++ libterm-readline-gnu-perl-1.35/debian/patches/50dumbterm.patch	2018-04-07 15:58:33.000000000 -0700
@@ -1,9 +1,15 @@
 Description: Do not use Term::ReadLine::Gnu on dumb terminals or emacs
 Origin: https://rt.cpan.org/Public/Bug/Display.html?id=123398
+Author: Hiroo HAYASHI <hayashi at cpan.org>
+Author: Steve Langasek <steve.langasek at ubuntu.com>
 Bug-Debian: https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=166987
+Bug-Debian: https://bugs.debian.org/895157
+Last-Modified: 2018-04-07
 
---- a/Gnu.pm
-+++ b/Gnu.pm
+Index: libterm-readline-gnu-perl-1.35/Gnu.pm
+===================================================================
+--- libterm-readline-gnu-perl-1.35.orig/Gnu.pm
++++ libterm-readline-gnu-perl-1.35/Gnu.pm
 @@ -80,6 +80,11 @@
  END
      }
@@ -11,7 +17,7 @@
 +# use Term::ReadLine::Stub on a dumb terminal.
 +# https://rt.cpan.org/Ticket/Display.html?id=123398
 +BEGIN {
-+    croak "dumb terminal." if($ENV{TERM} =~ /^(dumb|emacs|unknown)$/);
++    croak "dumb terminal." if(!exists $ENV{TERM} || $ENV{TERM} =~ /^(dumb|emacs|unknown)$/);
 +}
  
  {