comparison src/css.sml @ 1258:78b36c50daf9

Fix width/height CSS choices for table rows/columns; stop warning about inability to embed type in JavaScript
author Adam Chlipala <adamc@hcoop.net>
date Sun, 16 May 2010 18:25:00 -0400
parents c316ca3c9ec6
children b4480a56cab7
comparison
equal deleted inserted replaced
1257:fd1a49b51db5 1258:78b36c50daf9
64 64
65 val nada = ([], []) 65 val nada = ([], [])
66 val block = ([Block], [OBlock, Width, Height]) 66 val block = ([Block], [OBlock, Width, Height])
67 val inline = ([], [NonReplacedInline]) 67 val inline = ([], [NonReplacedInline])
68 val list = ([Block, List], [OBlock, Width, Height]) 68 val list = ([Block, List], [OBlock, Width, Height])
69 val replaced = ([], [ ReplacedInline, Width, Height]) 69 val replaced = ([], [ReplacedInline, Width, Height])
70 val table = ([Block, Table], [OBlock, OTable, Width, Height]) 70 val table = ([Block, Table], [OBlock, OTable, Width, Height])
71 val tr = ([Block], [OBlock, Tr, Width]) 71 val tr = ([Block], [OBlock, Tr, Height])
72 val td = ([Block, Td], [OBlock, OTd, Height]) 72 val td = ([Block, Td], [OBlock, OTd, Width])
73 73
74 val tags = [("span", inline), 74 val tags = [("span", inline),
75 ("div", block), 75 ("div", block),
76 ("p", block), 76 ("p", block),
77 ("b", inline), 77 ("b", inline),