summaryrefslogtreecommitdiff
path: root/fml/lib/Mail/Message/ToHTML.pm
diff options
context:
space:
mode:
Diffstat (limited to 'fml/lib/Mail/Message/ToHTML.pm')
-rw-r--r--fml/lib/Mail/Message/ToHTML.pm10
1 files changed, 8 insertions, 2 deletions
diff --git a/fml/lib/Mail/Message/ToHTML.pm b/fml/lib/Mail/Message/ToHTML.pm
index 50f37a14..b51ea89d 100644
--- a/fml/lib/Mail/Message/ToHTML.pm
+++ b/fml/lib/Mail/Message/ToHTML.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: ToHTML.pm,v 1.46 2003/07/20 04:58:29 fukachan Exp $
+# $FML: ToHTML.pm,v 1.47 2003/07/20 06:45:17 fukachan Exp $
#
package Mail::Message::ToHTML;
@@ -17,7 +17,7 @@ my $debug = 0;
my $URL =
"<A HREF=\"http://www.fml.org/software/\">Mail::Message::ToHTML</A>";
-my $version = q$FML: ToHTML.pm,v 1.46 2003/07/20 04:58:29 fukachan Exp $;
+my $version = q$FML: ToHTML.pm,v 1.47 2003/07/20 06:45:17 fukachan Exp $;
if ($version =~ /,v\s+([\d\.]+)\s+/) {
$version = "$URL $1";
}
@@ -115,8 +115,14 @@ sub new
}
+# Descriptions: destructor.
+# Arguments: OBJ($self)
+# Side Effects: none
+# Return Value: none
sub DESTROY
{
+ my ($self) = @_;
+
_PRINT_DEBUG("ToHTML::DESTROY");
1;
}