diff options
Diffstat (limited to 'layouts/default.sxml')
| -rw-r--r-- | layouts/default.sxml | 38 |
1 files changed, 38 insertions, 0 deletions
diff --git a/layouts/default.sxml b/layouts/default.sxml new file mode 100644 index 0000000..011db4c --- /dev/null +++ b/layouts/default.sxml @@ -0,0 +1,38 @@ +;; -*- mode: scheme; -*- +((menu-items + . (("Browse Source" . + "http://code.ryuslash.org/cgit.cgi/emacs/dispass.el/") + ("View README" . + "http://code.ryuslash.org/cgit.cgi/emacs/dispass.el/about/"))) + (print-item + . (lambda (mnu) + `(li (a (@ (href ,(cdr mnu))) ,(car mnu)))))) + +`((doctype-html) + (html (@ (lang "en")) + (head + (title ,($ 'title)) + (link (@ (rel "stylesheet") (type "text/css") + (href "css/bootstrap.min.css"))) + (link (@ (rel "stylesheet") (type "text/css") + (href "css/extra.css")))) + (body + (div (@ (class "navbar navbar-static-top")) + (div (@ (class "navbar-inner")) + (div (@ (class "container")) + (a (@ (href "") (class "brand")) + ,($ 'title)) + (ul (@ (class "nav pull-right")) + ,@(map (eval ($ 'print-item)) + ($ 'menu-items)))))) + (div (@ (class "container")) + (inject ,contents) + (div (@ (class "centered")) + (small + "This site has been generated by " + (a (@ (href "http://wiki.call-cc.org/eggref/4/hyde")) + "Hyde") " and is powered by " + (a (@ (href "http://twitter.github.com/bootstrap/")) + "Bootstrap") " and " + (a (@ (href "http://glyphicons.com/")) + "Glyphicons") ".")))))) |