commit 0bfa07683f7168a0648bd33e3ff6d6f63f7c8938 parent 6755f66048e841fb75d059ea0e0563a21e2601c5 Author: Alexander Burger <abu@software-lab.de> Date: Tue, 24 Jul 2012 08:51:04 +0200 Added '<trident>' function Diffstat:
M | lib/xhtml.l | | | 12 | +++++++++++- |
1 file changed, 11 insertions(+), 1 deletion(-)
diff --git a/lib/xhtml.l b/lib/xhtml.l @@ -1,4 +1,4 @@ -# 02jan12abu +# 24jul12abu # (c) Software Lab. Alexander Burger # *JS "*JS" *Style *Menu *Tab *ID @@ -292,6 +292,16 @@ (eval (pop 'Lst) 1) ) ) ) ) ) ) ) ) ) ) ) (prinl) ) +(de <trident> Lst + (<table> '(width . "100%") NIL NIL + (<tr> NIL + (<td> '((width . "33%") (align . left)) + (eval (car Lst) 1) ) + (<td> '((width . "34%") (align . center)) + (eval (cadr Lst) 1) ) + (<td> '((width . "33%") (align . right)) + (eval (caddr Lst) 1) ) ) ) ) + (de <spread> Lst (<table> '(width . "100%") NIL '((norm) (align)) (<row> NIL