diff options
author | Nicholas Clark <nick@ccl4.org> | 2009-10-02 11:11:19 +0100 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2009-10-02 11:11:19 +0100 |
commit | 3fd969f44926f311e1c67d9470a9e936f7af2d73 (patch) | |
tree | ce6e701f0f80bfd0de9befe7b1bf766e37a6cfbb /cpan/IO-Compress/t/106prime-deflate.t | |
parent | 70b2007073159a8b94a74b0b9ba406945c45917d (diff) | |
download | perl-3fd969f44926f311e1c67d9470a9e936f7af2d73.tar.gz |
Move IO::Compress from ext/ to cpan/
Diffstat (limited to 'cpan/IO-Compress/t/106prime-deflate.t')
-rw-r--r-- | cpan/IO-Compress/t/106prime-deflate.t | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/cpan/IO-Compress/t/106prime-deflate.t b/cpan/IO-Compress/t/106prime-deflate.t new file mode 100644 index 0000000000..0ef9bd8834 --- /dev/null +++ b/cpan/IO-Compress/t/106prime-deflate.t @@ -0,0 +1,21 @@ +BEGIN { + if ($ENV{PERL_CORE}) { + chdir 't' if -d 't'; + @INC = ("../lib", "lib/compress"); + } +} + +use lib qw(t t/compress); +use strict; +use warnings; + +use IO::Compress::Deflate qw($DeflateError) ; +use IO::Uncompress::Inflate qw($InflateError) ; + +sub identify +{ + 'IO::Compress::Deflate'; +} + +require "prime.pl" ; +run(); |