From 7f625742e5c3fbbd217a1ed2832b683aa1690729 Mon Sep 17 00:00:00 2001
From: fukachan <fukachan>
Date: Sun, 23 Dec 2001 03:01:27 +0000
Subject: FML::Checksum -> Mail::Message::Checksum

---
 regress/base/md5.pl | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/regress/base/md5.pl b/regress/base/md5.pl
index 0937fc46..6b0d8d54 100644
--- a/regress/base/md5.pl
+++ b/regress/base/md5.pl
@@ -5,7 +5,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: md5.pl,v 1.3 2001/04/03 09:51:12 fukachan Exp $
+# $FML: md5.pl,v 1.4 2001/06/17 09:00:29 fukachan Exp $
 #
 
 $file = shift || '/etc/group';
@@ -17,13 +17,13 @@ my $fh = new FileHandle $file;
 while (<$fh>) { $body .=  $_;}
 close($fh);
 
-use FML::Checksum;
-$p = new FML::Checksum;
+use Mail::Message::Checksum;
+$p = new Mail::Message::Checksum;
 
 $internal = $p->md5( \$body );
 $external = program($file);
 
-print "FML::Checksum::md5 ... ";
+print "Mail::Message::Checksum::md5 ... ";
 print (($internal eq $external) ? "ok" : "fail");
 print "\n";
 
-- 
cgit v1.2.1