From: Elizabeth Mattijsen <liz@dijkmat.nl>
Date: Wed, 10 Jul 2002 21:29:54 +0000 (+0200)
Subject: QuotedPrint.t
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9445987af6d20138e3b457bb627256972b72951a;p=p5sagit%2Fp5-mst-13.2.git

QuotedPrint.t
Message-Id: <4.2.0.58.20020710212608.02cd8100@mickey.dijkmat.nl>

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

diff --git a/lib/PerlIO/via/t/QuotedPrint.t b/lib/PerlIO/via/t/QuotedPrint.t
index 2ce9cfb..ee0f697 100644
--- a/lib/PerlIO/via/t/QuotedPrint.t
+++ b/lib/PerlIO/via/t/QuotedPrint.t
@@ -51,7 +51,7 @@ ok( close( $test ),			'close test handle' );
 # Check decoding _with_ layers
 
 ok(
- open( my $in,'<:via(PerlIO::via::QuotedPrint)', $file ),
+ open( my $in,'<:via(QuotedPrint)', $file ),
  "opening '$file' for reading"
 );
 is( $decoded,join( '',<$in> ),		'check decoding' );