Re: Color and font size of cells within a table

[Norman Walsh <norm@xxxxxxxxxxxxx>]

/ "Jordi Mulet" <jmulet@xxxxxxxxxx> was heard to say:
| Hello,
| When we execute Jade we obtain the message:
| conveni3.dsl:114:16:E: unexpected token "$pi-font-size$"

I don't have time to try this right now, but I think this might
work better:

(define ($process-cell-para-contents$ para colnum align body)
  (let ((font-name (case body
		     (("THEAD") %title-font-family%)
		     (("TFOOT") %title-font-family%)
		     (else  %body-font-family%)))
	(weight    (case body
		     (("THEAD") 'bold)
		     (("TFOOT") 'bold)
		     (else  'medium)))

;*****************************************************
; lets of fontsize and fontcolor
;*****************************************************
	(fontsize ($pi-font-size$))
	(fontcolor($pi-font-color$))
	(%factor% (if %verbatim-size-factor%
		      %verbatim-size-factor%
                      1.0) ))


In other words, put all the definintions in the one top-level
"let".

--norm


 DSSSList info and archive:  http://www.mulberrytech.com/dsssl/dssslist