2 files changed, 6 insertions, 2 deletions
diff --git a/quilt.changes b/quilt.changes
index 2214e9a..4f03694 100644
--- a/quilt.changes
+++ b/quilt.changes
@@ -1,4 +1,9 @@
 -------------------------------------------------------------------
+Fri Sep 23 20:06:50 CEST 2005 - khali@linux-fr.org
+
+- test/run: Do not depend on Term::ReadKey.
+
+-------------------------------------------------------------------
 Fri Sep 23 14:47:05 CEST 2005 - agruen@suse.de
 
 - Fix the test suite so that it doesn't fail if any higher-level
diff --git a/test/run b/test/run
index d0eac49..695a125 100755
--- a/test/run
+++ b/test/run
@@ -13,7 +13,6 @@ use strict;
 use FileHandle;
 use Getopt::Std;
 use POSIX qw(isatty setuid);
-use Term::ReadKey;
 use vars qw($opt_l $opt_v);
 
 no warnings qw(taint);
@@ -33,7 +32,7 @@ my ($prog, $in, $out) = ([], [], []);
 my $prog_line;
 my ($tests, $failed) = (0,0);
 my $lineno;
-my $width=((GetTerminalSize)[0] >> 1);
+my $width = ($ENV{COLUMNS} || 80) >> 1;
 
 for (;;) {
   my $line = <>; $lineno++;