$ more menu-item.scm 
`(div (@ (id ,id)
         (class "menu-item"))
      (a (@ (href ,href))
         (div (@ (class "icon " ,icon)))
         (div (@ (class "text")) ,text)))