#+title: Notes

# note to self: the reason you aren't using ns/blog-make-nav-strip here is the external 'Sort-by'
#+BEGIN_CENTER
Sort by [ edit date • [[./index_published.html][published date]] ]
#+END_CENTER

#+BEGIN_SRC elisp :results raw :exports results
(->>
 (if (boundp 'org-post-metas)
     org-post-metas
   (mapcar 'ns/blog-file-to-meta (f-entries ns/blog-posts-dir (fn (s-ends-with-p ".org" <>)))))
 (-filter (fn (not (ht-get <> :is-draft))))
 (-filter (fn (ht-get <> :edited-date))) ; what's tracked by git

 ;; sorting order
 ((lambda (items)
    (sort items (fn (string-lessp
		     (ht-get <1> :edited-date)
		     (ht-get <2> :edited-date)
		     )))))
 (mapcar
  (fn (format "- [[file:./%s.html][%s]] <%s> "
	      (f-base (ht-get <> :html-dest))
	      (ht-get <> :title)
	      (ht-get <> :edited-date)
	      )))
 reverse
 (s-join "\n")
 )
#+END_SRC