;; required on update
;; -- (let (feed-ref "https://URI/atom")
;;         (update-time 

(feed
 ((xmlns "http://www.w3.org/2005/Atom"))
 (title "λ.sorrel.dev")
 (link ((rel "self")
        (href ,feed-ref)))
 (updated ,update-time)
 (author
  (name "sorrel"))
 (id ,homepage)
 
; ,(map
;   (lambda (item)
;     `(entry
;       (title ,(title item))
;       (link ((href ,(href item))))
;       (id ,(href item))
;       (type ,(type item)) ; usually html
;       ,(map (lambda (category)
;               `(category ((term ,(term category))
;                           (scheme ,(scheme category)))))
;             (categories item))
;       (updated ,(updated item)))
;   items))
 )