remove private method.

s/_rollback_map_position/rollback_map_position/g;
s/_reset_mapinfo/reset_mapinfo/g;

2 files changed, 11 insertions, 11 deletions

diff --git a/fml/lib/Mail/Delivery/SMTP.pm b/fml/lib/Mail/Delivery/SMTP.pm
index 40b0f01e..aee1f7c6 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.25 2004/05/16 04:55:55 fukachan Exp $
+# $FML: SMTP.pm,v 1.26 2004/05/16 05:00:30 fukachan Exp $
 #
 
 
@@ -504,7 +504,7 @@ sub deliver
 
     # clean up recipient_map information after "all delivery"
     # CAUTION: this mapinfo tracks the delivery status.
-    $self->_reset_mapinfo;
+    $self->reset_mapinfo;
 
     if ( $self->{ _num_recipients } ) {
 	Log( "recipients: total=". $self->{ _num_recipients } );
@@ -571,7 +571,7 @@ sub _deliver
     #    IF_ERROR_FOUND: roll back the process to the state before this
     $self->_send_recipient_list($args);
     if ($self->error) {
-	$self->_rollback_map_position;
+	$self->rollback_map_position;
 	$self->_reset_smtp_transaction;
 	return;
     }
@@ -581,7 +581,7 @@ sub _deliver
     #                    return as soon as possible from here.
     $self->_send_data_to_mta($args);
     if ($self->error) {
-	$self->_rollback_map_position;
+	$self->rollback_map_position;
 	$self->_reset_smtp_transaction;
 	return;
     }
diff --git a/fml/lib/Mail/Delivery/Utils.pm b/fml/lib/Mail/Delivery/Utils.pm
index fa8f1b23..b40b53bd 100644
--- a/fml/lib/Mail/Delivery/Utils.pm
+++ b/fml/lib/Mail/Delivery/Utils.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: Utils.pm,v 1.16 2004/05/16 04:55:56 fukachan Exp $
+# $FML: Utils.pm,v 1.17 2004/05/16 05:00:41 fukachan Exp $
 #
 
 package Mail::Delivery::Utils;
@@ -37,8 +37,8 @@ require Exporter;
 	     set_map_position
 	     get_map_status
 	     get_map_position
-	     _rollback_map_position
-	     _reset_mapinfo
+	     rollback_map_position
+	     reset_mapinfo
 	     );
 
 
@@ -349,13 +349,13 @@ sub get_map_position
 }
 
 
-=head2 _rollback_map_position()
+=head2 rollback_map_position()
 
 stop the IO for the current C<$map>.
 This method rolls back the operation state to the time when the
 current IO for C<$map> begins.
 
-=head2 _reset_mapinfo()
+=head2 reset_mapinfo()
 
 clear information around the latest map operation.
 
@@ -366,7 +366,7 @@ clear information around the latest map operation.
 #    Arguments: OBJ($self)
 # Side Effects: none
 # Return Value: none
-sub _rollback_map_position
+sub rollback_map_position
 {
     my ($self) = @_;
     my $map    = $self->get_target_map;
@@ -396,7 +396,7 @@ sub _rollback_map_position
 #    Arguments: OBJ($self)
 # Side Effects: clear info in object
 # Return Value: none
-sub _reset_mapinfo
+sub reset_mapinfo
 {
     my ($self) = @_;
     $self->set_target_map('');