44
45
46
47
48
49
50
|
title
#:style (style #f (list (attributes '((target . "_parent")))))))
(define (ext-link url-str . elems)
(keyword-apply hyperlink '(#:style) (list (style #f (list (attributes '((target . "_blank"))))))
url-str
elems))
|
>
>
>
>
>
>
|
44
45
46
47
48
49
50
51
52
53
54
55
56
|
title
#:style (style #f (list (attributes '((target . "_parent")))))))
(define (ext-link url-str . elems)
(keyword-apply hyperlink '(#:style) (list (style #f (list (attributes '((target . "_blank"))))))
url-str
elems))
(define (responsive-retina-image img-path)
(image img-path
#:scale 0.5
#:style (style #f (list (attributes '((style . "max-width:100%;height:auto;")))))))
|
