diff options
| author | fukachan <fukachan> | 2003-02-09 12:31:39 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2003-02-09 12:31:39 +0000 |
| commit | e71b5a31cc5e023d2b0190f45450851a8f40a7e6 (patch) | |
| tree | 3fdcdf95b74a1bb8f1582c63570b90fbe9ca0e2e /fml/lib/Mail/Message/ToHTML.pm | |
| parent | c23e0d7fd6287ecfcb8c03eb1b68ec4fc958d7bd (diff) | |
| download | fml8-e71b5a31cc5e023d2b0190f45450851a8f40a7e6.tar.gz fml8-e71b5a31cc5e023d2b0190f45450851a8f40a7e6.tar.bz2 fml8-e71b5a31cc5e023d2b0190f45450851a8f40a7e6.zip | |
cosmetics (white spaces)
Diffstat (limited to 'fml/lib/Mail/Message/ToHTML.pm')
| -rw-r--r-- | fml/lib/Mail/Message/ToHTML.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/fml/lib/Mail/Message/ToHTML.pm b/fml/lib/Mail/Message/ToHTML.pm index f012cfee..177950dc 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.34 2003/01/26 05:57:12 fukachan Exp $ +# $FML: ToHTML.pm,v 1.35 2003/02/06 15:15:05 tmu 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.34 2003/01/26 05:57:12 fukachan Exp $; +my $version = q$FML: ToHTML.pm,v 1.35 2003/02/06 15:15:05 tmu Exp $; if ($version =~ /,v\s+([\d\.]+)\s+/) { $version = "$URL $1"; } @@ -1786,7 +1786,7 @@ sub update_id_index for my $id ( reverse (1 .. $id_max )) { $self->_print_li_filename($wh, $db, $id, $code); } - } + } else { for my $id ( 1 .. $id_max ) { $self->_print_li_filename($wh, $db, $id, $code); @@ -1976,7 +1976,7 @@ sub _update_id_monthly_index next unless $id =~ /^\d+$/; $self->_print_li_filename($wh, $db, $id, $code); } - } + } else { for my $id (sort {$a <=> $b} @list) { next unless $id =~ /^\d+$/; |