Skip to content

Instantly share code, notes, and snippets.

@kiwanami

kiwanami/cfw-koyomi-source.el

Created November 7, 2011 12:48
Show Gist options
  • Save kiwanami/1344843 to your computer and use it in GitHub Desktop.
Save kiwanami/1344843 to your computer and use it in GitHub Desktop.
Download ZIP
cfw-koyomi-source.el
Raw
cfw-koyomi-source.el
(defvar cfw:koyomi-source
(make-cfw:source
:name "六曜"
:data
(lambda (b e)
(mapcar
(lambda (date)
(cons date (nth 3 (暦-旧暦 (calendar-absolute-from-gregorian date)))))
(cfw:enumerate-days b e)))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment