(mac onlink (text . body)
  `(w/link (do ,@body) (pr ,text)))

From srv.arc ©