              (xml/element :copyright {}
                           "sharenjoy")
              (xml/element :webMaster {}
-                          "info@spaz.org")
+                          "info@spaz.org (S.P.A.Z. Infoline)")
              (xml/element :language {}
                           "en")
              (xml/element :generator {}

                              full-title)
                 (xml/element :content:encoded {}
                              )
                 (xml/element :enclosure:url {:type "audio/ogg"}
                              ;; TODO: add length= in bytes
                              link)
                 (xml/element :itunes:duration {}
                              ;; TODO: XXX no, this must be th real duration. pull it out

    (merge {:date (ymd-to-date [y m d])
            :show (if (-> show empty?) "" (unogg show))
            :basename f
            :length (-> full-file jio/file .length)
            :link (str link f)
            :full-file full-file}
           (read-header full-file))))
