Skip to content

Commit 117b629

Browse files
committed
[css2] Fixed minor bug
--HG-- extra : convert_revision : svn%3A73dc7c4b-06e6-40f3-b4f7-9ed1dbc14bfc/trunk%401485
1 parent 1188b53 commit 117b629

2 files changed

Lines changed: 14 additions & 10 deletions

File tree

css2/bin/Attic/mkpropidx

Lines changed: 7 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
#!/usr/local/bin/perl
22
# Index of property names.
33
# Arnaud Le Hors lehors@w3.org/Ian Jacobs ij@w3.org
4-
# $Id: mkpropidx,v 2.1 1998-03-14 23:42:38 ijacobs Exp $
4+
# $Id: mkpropidx,v 2.2 1998-04-13 20:33:22 ijacobs Exp $
55
use English;
66

77

@@ -74,12 +74,14 @@ sub cleanup {
7474
# Property database entries between "/*" and "*/"
7575

7676
sub format_name {
77-
$name = cleanup($_[0]);
78-
# print OUTPUT "<td><span class=\"propinst-" . $name . ", xref\">'" . $name . "'<\/span>\n";
79-
print OUTPUT "<td><span class=\"propinst-" . $name . "\">'" . $name . "'<\/span>\n";
77+
print OUTPUT "<td>";
78+
foreach $name (split(' ', $_[0])) {
79+
$name = cleanup($name);
80+
print STDERR "$name\n";
81+
print OUTPUT "<span class=\"propinst-" . $name . "\">'" . $name . "'<\/span>\n";
82+
}
8083
}
8184

82-
8385
sub format_val {
8486
# Replace <n> by link to value def of n
8587
# Replace <'m'> by link to property 'm'

css2/bin/mkpropidx

Lines changed: 7 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
#!/usr/local/bin/perl
22
# Index of property names.
33
# Arnaud Le Hors lehors@w3.org/Ian Jacobs ij@w3.org
4-
# $Id: mkpropidx,v 2.1 1998-03-14 23:42:38 ijacobs Exp $
4+
# $Id: mkpropidx,v 2.2 1998-04-13 20:33:22 ijacobs Exp $
55
use English;
66

77

@@ -74,12 +74,14 @@ sub cleanup {
7474
# Property database entries between "/*" and "*/"
7575

7676
sub format_name {
77-
$name = cleanup($_[0]);
78-
# print OUTPUT "<td><span class=\"propinst-" . $name . ", xref\">'" . $name . "'<\/span>\n";
79-
print OUTPUT "<td><span class=\"propinst-" . $name . "\">'" . $name . "'<\/span>\n";
77+
print OUTPUT "<td>";
78+
foreach $name (split(' ', $_[0])) {
79+
$name = cleanup($name);
80+
print STDERR "$name\n";
81+
print OUTPUT "<span class=\"propinst-" . $name . "\">'" . $name . "'<\/span>\n";
82+
}
8083
}
8184

82-
8385
sub format_val {
8486
# Replace <n> by link to value def of n
8587
# Replace <'m'> by link to property 'm'

0 commit comments

Comments
 (0)