scribble: fix Latex renderer treatment of table cell/column styles

The renderer was using symbol style names as command names, but only
strings should be treated that way.

original commit: 0f5b53d3498f857920ff7fa438269727553dc058
This commit is contained in:
Matthew Flatt 2011-10-06 07:47:38 -06:00
parent 02d8332600
commit 80d1ff2273

View File

@ -544,7 +544,7 @@
[center? (and (not bottom?)
(not top?))]
[as-box? (and can-box? (boxable? p))])
(when (style-name vstyle)
(when (string? (style-name vstyle))
(printf "\\~a{" (style-name vstyle)))
(let ([minipage? (and can-box? (not as-box?))])
(when minipage?
@ -569,7 +569,7 @@
(render-block p part ri #f)])
(when minipage?
(printf " \\end{minipage}\n")))
(when (style-name vstyle)
(when (string? (style-name vstyle))
(printf "}"))
null))