diff options
| author | fukachan <fukachan> | 2001-12-22 16:07:09 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-12-22 16:07:09 +0000 |
| commit | fb1a37929b97adbbc4fb97974aaea3c04f7a849d (patch) | |
| tree | b06c4290760c18934039074550bb483e8eecff8d | |
| parent | 7f9ea6287f096714adda188c9247526c9e16ec77 (diff) | |
| download | fml8-fb1a37929b97adbbc4fb97974aaea3c04f7a849d.tar.gz fml8-fb1a37929b97adbbc4fb97974aaea3c04f7a849d.tar.bz2 fml8-fb1a37929b97adbbc4fb97974aaea3c04f7a849d.zip | |
FML::Checksum -> Mail::Message::Checksum
| -rw-r--r-- | fml/lib/FML/Confirm.pm | 6 | ||||
| -rw-r--r-- | fml/lib/Mail/Message/Checksum.pm (renamed from fml/lib/FML/Checksum.pm) | 12 |
2 files changed, 9 insertions, 9 deletions
diff --git a/fml/lib/FML/Confirm.pm b/fml/lib/FML/Confirm.pm index 399c8ba3..8fca96bf 100644 --- a/fml/lib/FML/Confirm.pm +++ b/fml/lib/FML/Confirm.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: Confirm.pm,v 1.2 2001/12/22 09:11:55 fukachan Exp $ +# $FML: Confirm.pm,v 1.3 2001/12/22 09:21:01 fukachan Exp $ # package FML::Confirm; @@ -97,8 +97,8 @@ sub assign_id my $pid = $$; my $string = "$time $pid $addr $buffer"; - use FML::Checksum; - my $cksum = new FML::Checksum; + use Mail::Message::Checksum; + my $cksum = new Mail::Message::Checksum; my $md5sum = $cksum->md5( \$string ); # o.k. assign id diff --git a/fml/lib/FML/Checksum.pm b/fml/lib/Mail/Message/Checksum.pm index a18faeae..f5d96d94 100644 --- a/fml/lib/FML/Checksum.pm +++ b/fml/lib/Mail/Message/Checksum.pm @@ -4,10 +4,10 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: Checksum.pm,v 1.12 2001/05/29 16:21:15 fukachan Exp $ +# $FML: Checksum.pm,v 1.13 2001/12/22 09:21:00 fukachan Exp $ # -package FML::Checksum; +package Mail::Message::Checksum; use strict; use vars qw(@ISA @EXPORT @EXPORT_OK $AUTOLOAD); use Carp; @@ -15,12 +15,12 @@ use FML::Log qw(Log LogWarn LogError); =head1 NAME -FML::Checksum - utilities for check sum +Mail::Message::Checksum - utilities for check sum =head1 SYNOPSIS - use FML::Checksum; - $cksum = new FML::Checksum; + use Mail::Message::Checksum; + $cksum = new Mail::Message::Checksum; $md5sum = $cksum->md5( \$string ); =head1 METHODS @@ -235,7 +235,7 @@ redistribute it and/or modify it under the same terms as Perl itself. =head1 HISTORY -FML::Checksum appeared in fml5 mailing list driver package. +Mail::Message::Checksum appeared in fml5 mailing list driver package. See C<http://www.fml.org/> for more details. Algorithm used here is based on NetBSD cksum library (C program). |
