Skip to content

Commit 3c49e24

Browse files
committed
[css2] Modified since was producing illegal SGML
--HG-- extra : convert_revision : svn%3A73dc7c4b-06e6-40f3-b4f7-9ed1dbc14bfc/trunk%40808
1 parent 45a4072 commit 3c49e24

2 files changed

Lines changed: 8 additions & 4 deletions

File tree

css2/bin/Attic/mkidx

Lines changed: 4 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -31,7 +31,7 @@ open(OUTPUT, ">$output") || die "$PROG: cannot create file $output\n";
3131
# Write it out
3232
@prev = ('', '', '', '', '', '');
3333
$prevletter = ' ';
34-
print OUTPUT "<ul class=\"index\">";
34+
#print OUTPUT "<ul class=\"index\">";
3535
$lvl = 0;
3636
$seqno = 1; # Number within an entry
3737
foreach $e (@sorted) {
@@ -58,7 +58,9 @@ foreach $e (@sorted) {
5858
$letter =~ s/^[^a-z0-9\@:]+//sio;
5959
$letter = lc(substr($letter, 0, 1));
6060
if ($letter ne $prevletter) {
61-
print OUTPUT "\n</ul>";
61+
if ($prevletter ne ' ') {
62+
print OUTPUT "\n</ul>";
63+
}
6264
print OUTPUT "\n<p><a name=\"index-$letter\">&nbsp;</a>";
6365
print OUTPUT "\n<ul class=\"index\">";
6466
$prevletter = $letter;

css2/bin/mkidx

Lines changed: 4 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -31,7 +31,7 @@ open(OUTPUT, ">$output") || die "$PROG: cannot create file $output\n";
3131
# Write it out
3232
@prev = ('', '', '', '', '', '');
3333
$prevletter = ' ';
34-
print OUTPUT "<ul class=\"index\">";
34+
#print OUTPUT "<ul class=\"index\">";
3535
$lvl = 0;
3636
$seqno = 1; # Number within an entry
3737
foreach $e (@sorted) {
@@ -58,7 +58,9 @@ foreach $e (@sorted) {
5858
$letter =~ s/^[^a-z0-9\@:]+//sio;
5959
$letter = lc(substr($letter, 0, 1));
6060
if ($letter ne $prevletter) {
61-
print OUTPUT "\n</ul>";
61+
if ($prevletter ne ' ') {
62+
print OUTPUT "\n</ul>";
63+
}
6264
print OUTPUT "\n<p><a name=\"index-$letter\">&nbsp;</a>";
6365
}
6466
}

0 commit comments

Comments
 (0)