diff options
| author | fukachan <fukachan> | 2001-05-04 14:32:32 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-05-04 14:32:32 +0000 |
| commit | 149320fad450d354f755201015ae3826ee5d0fe6 (patch) | |
| tree | 34d5d452336e31124a7b3309da21f95d2b0c0460 /fml/lib/IO/t/array_map.pl | |
| parent | b4ef1b3d71ef5fab8342c22007066aa0d22267d7 (diff) | |
| download | fml8-149320fad450d354f755201015ae3826ee5d0fe6.tar.gz fml8-149320fad450d354f755201015ae3826ee5d0fe6.tar.bz2 fml8-149320fad450d354f755201015ae3826ee5d0fe6.zip | |
rename class from IO::MapAdapter to IO::Adapter.
Diffstat (limited to 'fml/lib/IO/t/array_map.pl')
| -rwxr-xr-x | fml/lib/IO/t/array_map.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/fml/lib/IO/t/array_map.pl b/fml/lib/IO/t/array_map.pl index 4fc14578..aced3a8b 100755 --- a/fml/lib/IO/t/array_map.pl +++ b/fml/lib/IO/t/array_map.pl @@ -5,7 +5,7 @@ # redistribute it and/or modify it under the same terms as Perl itself. # # $Id$ -# $FML$ +# $FML: array_map.pl,v 1.2 2001/04/03 09:45:47 fukachan Exp $ # use Carp; @@ -13,8 +13,8 @@ use strict; my $map = ['a', 'b', 'c']; -use IO::MapAdapter; -my $obj = new IO::MapAdapter $map; +use IO::Adapter; +my $obj = new IO::Adapter $map; $obj->open || croak("cannot open $map"); if ($obj->error) { croak( $obj->error );} |