                  (xml/element :itunes:block {}
                               "no"             )
                  (xml/element :pubDate {}
-                              fdate)
+                              date)
                  (xml/element :link {}  link)
                  (xml/element :guid {:isPermaLink "false"}
                               link))))

  
  (urepl/massive-spew "/tmp/foo.edn" *1)


  )
  [link dirname]
  (->>   dirname
         (process-dir link)
         (sort-by :title)
         reverse))

;; TODO: move to utlilza
