commit b05abb9f98e65bdb1d7f9c4d60f7346828585e01 parent 3ac5c1cc40d6548a3dd24d52dc8deadb62bf42fe Author: Greg Hendershott <greghendershott@gmail.com> Date: Sat, 27 Oct 2012 19:21:01 -0400 Add <meta> tags. Diffstat:
| M | add-to-head.rkt | | | 12 | +++++++++++- |
1 file changed, 11 insertions(+), 1 deletion(-)
diff --git a/add-to-head.rkt b/add-to-head.rkt @@ -26,9 +26,19 @@ var s = document.getElementsByTagName('script')[0]; s.parentNode.insertBefore(ga EOF ) +(define (meta k v) + (format "<meta name=\"~a\" content=\"~a\">" k v)) + +(define metas + (string-append + (meta "keywords" "Racket,macros,Scheme") + (meta "description" "Practical Racket macros") + (meta "author" "Greg Hendershott") + (meta "charset" "utf-8"))) + (define </head> "</head>") -(define all (string-append web-font ga-code </head>)) +(define all (string-append metas web-font ga-code </head>)) (define subst (regexp-replace* "\n" all "")) ;minify (define old (file->string "main.html"))