diff options
| author | fukachan <fukachan> | 2002-01-27 13:11:57 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2002-01-27 13:11:57 +0000 |
| commit | cd17f7899482fbcb118114a9b83cfb33db1520af (patch) | |
| tree | 6d46915cd61bb3e763fc62c5c465fc31acbd4f9f /fml/lib/Mail | |
| parent | 81cabe0bc65a6659185b73301b332653af03f67e (diff) | |
| download | fml8-cd17f7899482fbcb118114a9b83cfb33db1520af.tar.gz fml8-cd17f7899482fbcb118114a9b83cfb33db1520af.tar.bz2 fml8-cd17f7899482fbcb118114a9b83cfb33db1520af.zip | |
clarify IO::Adapter definition and clean up get_XXX() functions.
remove get_member(), get_active() and get_recipient()
define get_next_key() and get_next_value() and clarify thier definitions.
Diffstat (limited to 'fml/lib/Mail')
| -rw-r--r-- | fml/lib/Mail/Delivery/SMTP.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/fml/lib/Mail/Delivery/SMTP.pm b/fml/lib/Mail/Delivery/SMTP.pm index 49d9e506..9ac06b71 100644 --- a/fml/lib/Mail/Delivery/SMTP.pm +++ b/fml/lib/Mail/Delivery/SMTP.pm @@ -4,7 +4,7 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: SMTP.pm,v 1.11 2002/01/13 07:01:28 fukachan Exp $ +# $FML: SMTP.pm,v 1.12 2002/01/16 13:34:03 fukachan Exp $ # @@ -674,7 +674,7 @@ sub _send_recipient_list_by_recipient_map # XXX $obj->get_recipient returns a mail address. RCPT_INPUT: - while (defined ($rcpt = $obj->get_recipient)) { + while (defined ($rcpt = $obj->get_next_key)) { $num_recipients++; $self->_send_command("RCPT TO:<$rcpt>"); $self->_read_reply; |