diff --git a/layouts/default.sxml b/layouts/default.sxml index bed26f2..73981a2 100644 --- a/layouts/default.sxml +++ b/layouts/default.sxml @@ -1,5 +1,8 @@ ;; -*- mode: scheme; -*- -((menu-items +((site-title . "Markam") + (menu-items-left + . (("Downloads" . "downloads.html"))) + (menu-items-right . (("Browse Source" . "http://code.ryuslash.org/cgit.cgi/markam/") ("View README" . @@ -11,7 +14,7 @@ `((doctype-html) (html (@ (lang "en")) (head - (title ,($ 'title)) + (title ,($ 'site-title) ": " ,($ 'title)) (link (@ (rel "stylesheet") (type "text/css") (href "css/bootstrap.min.css"))) (link (@ (rel "stylesheet") (type "text/css") @@ -20,12 +23,18 @@ (div (@ (class "navbar navbar-static-top")) (div (@ (class "container")) (div (@ (class "container")) - (a (@ (href "") (class "brand")) - ,($ 'title)) + (a (@ (href "index.html") (class "brand")) + ,($ 'site-title)) + (ul (@ (class "nav")) + ,@(map (eval ($ 'print-item)) + ($ 'menu-items-left))) (ul (@ (class "nav pull-right")) ,@(map (eval ($ 'print-item)) - ($ 'menu-items)))))) + ($ 'menu-items-right)))))) (div (@ (class "container")) + (div (@ (class "page-header")) + (h1 ,($ 'site-title) + (small ", " ,($ 'title)))) (inject ,contents) (div (@ (class "centered")) (small diff --git a/src/downloads.sxml b/src/downloads.sxml new file mode 100644 index 0000000..94c93ac --- /dev/null +++ b/src/downloads.sxml @@ -0,0 +1,15 @@ +;; -*- mode: scheme; -*- +((title . "downloads") + (versions . ("master" "0.2.0" "0.1.0"))) + +`((ul + ,@(map (lambda (version) + `(li ,version ": " + (a (@ (href "http://code.ryuslash.org/cgit.cgi/markam/snapshot/markam-" + ,version ".tar.gz")) + "tar.gz") + ", " + (a (@ (href "http://code.ryuslash.org/cgit.cgi/markam/snapshot/markam-" + ,version ".zip")) + "zip"))) + ($ 'versions)))) diff --git a/src/index.sxml b/src/index.sxml index afcf0ee..01c5785 100644 --- a/src/index.sxml +++ b/src/index.sxml @@ -1,26 +1,23 @@ ;; -*- mode: scheme; -*- -((title . "Markam") +((title . "store bookmarks") (conkeror . (a (@ (href "http://conkeror.org")) "Conkeror")) (chicken . (a (@ (href "http://call-cc.org")) "CHICKEN scheme")) (chicken-sqlite . (a (@ (href "http://wiki.call-cc.org/eggref/4/sqlite3")) "sqlite3")) (tar-gz - . "http://code.ryuslash.org/cgit.cgi/markam/snapshot/markam-0.1.0.tar.gz") + . "http://code.ryuslash.org/cgit.cgi/markam/snapshot/markam-0.2.0.tar.gz") (zip - . "http://code.ryuslash.org/cgit.cgi/markam/snapshot/markam-0.1.0.zip") + . "http://code.ryuslash.org/cgit.cgi/markam/snapshot/markam-0.2.0.zip") (dev-tar-gz . "http://code.ryuslash.org/cgit.cgi/markam/snapshot/markam-master.tar.gz") (dev-zip . "http://code.ryuslash.org/cgit.cgi/markam/snapshot/markam-master.zip")) -`((div (@ (class "page-header")) - (h1 ,($ 'title) - (small ", store bookmarks"))) - (div (@ (class "hero-unit")) +`((div (@ (class "hero-unit")) (p "Store bookmarks without being stuck to a single browser.") (div (@ (class "row")) (div (@ (class "span3 centered")) (h3 "Version") - "0.1.0") + "0.2.0") (div (@ (class "span4 centered")) (h3 "Language") ,($ 'chicken)) @@ -62,10 +59,10 @@ (div (@ (class "span6")) (a (@ (href ,($ 'tar-gz)) (class "btn btn-large btn-block")) - "Download 0.1.0 .tar.gz") + "Download 0.2.0 .tar.gz") (a (@ (href ,($ 'zip)) (class "btn btn-large btn-block")) - "Download 0.1.0 .zip")) + "Download 0.2.0 .zip")) (div (@ (class "span6")) (a (@ (href ,($ 'dev-tar-gz)) (class "btn btn-large btn-block"))