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/FML/Command | |
| 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/FML/Command')
| -rw-r--r-- | fml/lib/FML/Command/subscribe.pm | 8 | ||||
| -rw-r--r-- | fml/lib/FML/Command/unsubscribe.pm | 8 |
2 files changed, 8 insertions, 8 deletions
diff --git a/fml/lib/FML/Command/subscribe.pm b/fml/lib/FML/Command/subscribe.pm index 19dbb839..cd84aef7 100644 --- a/fml/lib/FML/Command/subscribe.pm +++ b/fml/lib/FML/Command/subscribe.pm @@ -5,7 +5,7 @@ # redistribute it and/or modify it under the same terms as Perl itself. # # $Id$ -# $FML$ +# $FML: subscribe.pm,v 1.7 2001/04/03 09:45:42 fukachan Exp $ # package FML::Command::subscribe; @@ -41,11 +41,11 @@ sub subscribe croak("\$member_map is not specified") unless $member_map; croak("\$recipient_map is not specified") unless $recipient_map; - use IO::MapAdapter; - my $obj = new IO::MapAdapter $member_map; + use IO::Adapter; + my $obj = new IO::Adapter $member_map; $obj->add( $address ); - $obj = new IO::MapAdapter $recipient_map; + $obj = new IO::Adapter $recipient_map; $obj->add( $address ); } diff --git a/fml/lib/FML/Command/unsubscribe.pm b/fml/lib/FML/Command/unsubscribe.pm index fb618588..3690fc04 100644 --- a/fml/lib/FML/Command/unsubscribe.pm +++ b/fml/lib/FML/Command/unsubscribe.pm @@ -5,7 +5,7 @@ # redistribute it and/or modify it under the same terms as Perl itself. # # $Id$ -# $FML$ +# $FML: unsubscribe.pm,v 1.7 2001/04/03 09:45:42 fukachan Exp $ # package FML::Command::unsubscribe; @@ -39,11 +39,11 @@ sub unsubscribe croak("\$member_map is not specified") unless $member_map; croak("\$recipient_map is not specified") unless $recipient_map; - use IO::MapAdapter; - my $obj = new IO::MapAdapter $member_map; + use IO::Adapter; + my $obj = new IO::Adapter $member_map; $obj->delete( $address ); - $obj = new IO::MapAdapter $recipient_map; + $obj = new IO::Adapter $recipient_map; $obj->delete( $address ); } |