dynamic css reloader in sibilant

reload-css.sibilant

;; reload css
(scoped
 (var all-link (document.getElementsByTagName "link")
      i 0)
 (while (< i all-link.length)
        (var link (get all-link i))
        (when (< -1 (|> (link.getAttribute "type")
                        (.indexOf "css")))
              (console.log "reload " link)
              (assign link.href (+ link.href "?t=" (|> (new Date)
                                                       .getTime))))
        (incr i)))