mithril's first page example ported to sibilant

mithril.sibilant

(var app {})

(def app.page-list () (m.request {method 'GET url 'pages.json}))

(def app.controller ()
   (var pages (app.page-list))
   {pages pages rotate (#() (pages.push (pages.shift)))})

(def app.view (ctrl)
  [(ctrl.pages.map (#(page) (m "a" {href page.url} page.title))) (m "button" {onclick ctrl.rotate}, "rotate links")])

(m.module (document.getElementById "example") app)