From: Nicholas Clark <nick@ccl4.org>
Date: Wed, 29 Dec 2004 19:47:12 +0000 (+0000)
Subject: Oops. Forgot to uncomment the last set of Unicode values for
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=8c51517677f7444669d829b895c0ed1364734bbc;p=p5sagit%2Fp5-mst-13.2.git

Oops. Forgot to uncomment the last set of Unicode values for
testing.

p4raw-id: //depot/perl@23704
---

diff --git a/t/op/read.t b/t/op/read.t
index 6aab395..5819011 100755
--- a/t/op/read.t
+++ b/t/op/read.t
@@ -9,7 +9,7 @@ BEGIN {
 }
 use strict;
 
-plan tests => 1732;
+plan tests => 2564;
 
 open(FOO,'op/read.t') || open(FOO,'t/op/read.t') || open(FOO,':op:read.t') || die "Can't open op.read";
 seek(FOO,4,0) or die "Seek failed: $!";
@@ -31,7 +31,7 @@ my $tmpfile = 'Op_read.tmp';
 
 my (@values, @buffers) = ('', '');
 
-foreach (65, 161, 253) { #  9786) {
+foreach (65, 161, 253, 9786) {
     push @values, join "", map {chr $_} $_ .. $_ + 4;
     push @buffers, join "", map {chr $_} $_ + 5 .. $_ + 20;
 }