picolisp

commit 05922e579e1c0cde4b0df75e000cc9144d09fac3
parent 7898d0766966b43739897e2a7578f71b41df26a6
Author: Alexander Burger <abu@software-lab.de>
Date:   Tue, 22 Nov 2011 12:29:42 +0100

(Re)introduce target attribute
Diffstat:
M
lib/xhtml.l
 | 
3
++-

1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/lib/xhtml.l b/lib/xhtml.l
@@ -189,8 +189,9 @@
    (tag 'li Attr 2 Prg)
    (prinl) )
 
-(de <href> (Str Url)
+(de <href> (Str Url Tar)
    (prin "<a href=\"" (sesId Url) "\"")
+   (and Tar (prin " target=\"" Tar "\""))
    (and *Style (htStyle @))
    (prin '>)
    (ht:Prin Str)