(mac npage (title . body) `(tag html (tag head (gen-css-url) (prn "<link rel=\"shortcut icon\" href=\"" favicon-url* "\">") (prn "<meta name=\"viewport\" content=\"width=device-width\">") (prn "<base target=\"_blank\">") ;; <--- add this line (tag script (pr votejs*)) (tag title (pr ,title))) (tag body (center (tag (table border 0 cellpadding 0 cellspacing 0 width "85%" bgcolor sand) ,@body)))))