diff options
| -rw-r--r-- | fml/lib/Mail/HTML/Lite.pm | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/fml/lib/Mail/HTML/Lite.pm b/fml/lib/Mail/HTML/Lite.pm index c3513336..1ad3b4eb 100644 --- a/fml/lib/Mail/HTML/Lite.pm +++ b/fml/lib/Mail/HTML/Lite.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: Lite.pm,v 1.29 2001/10/29 15:07:03 fukachan Exp $ +# $FML: Lite.pm,v 1.30 2001/11/17 04:01:54 fukachan Exp $ # package Mail::HTML::Lite; @@ -15,7 +15,7 @@ use Carp; my $debug = $ENV{'debug'} ? 1 : 0; my $URL = "<A HREF=\"http://www.fml.org/software/\">Mail::HTML::Lite</A>"; -my $version = q$FML: Lite.pm,v 1.29 2001/10/29 15:07:03 fukachan Exp $; +my $version = q$FML: Lite.pm,v 1.30 2001/11/17 04:01:54 fukachan Exp $; if ($version =~ /,v\s+([\d\.]+)\s+/) { $version = "$URL $1"; } @@ -2122,6 +2122,9 @@ sub htmlify_file if ($html->is_ignore($id)) { warn("not process $id (already exists)") if defined $ENV{'debug'}; } + else { + printf STDERR " converted( id=%-6s src=%s )\n", $id, $file; + } } |