Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (defmacro HTML-inline (&body contents)
- `(with-html-output-to-string
- (*standard-output* nil :indent t)
- ,@contents))
- (defun scripts/ (&rest scripts)
- (dolist (script scripts)
- (HTML-inline (:script :type "text/javascript" :src script))))
- ;; Then at the end of body:
- (scripts/ "joom.js" "jquery.min.js")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement