cal-japan.el .. Japanese Calendar

概要

Emacs Lisp による和暦（元号・干支）の実装です。

設定

(require 'cal-japan)
(define-key calendar-mode-map "pJ" 'calendar-japanese-print-date)
(define-key calendar-mode-map "gJ" 'calendar-japanese-goto-date)

利用例

• カレンダーで見たい日付にカーソルを合わせて、p,J (calendar-japanese-print-date) とキー入力することで、日本の元号が表示されます。
• カレンダーで g,J (calendar-japanese-goto-date) とキー入力することで、元号を入力して当該日に行けます。
• M-x calendar-japanese-query-year で、元号・年を入力して西暦年を求められます。
• M-x calendar-japanese-query-date で、旧暦の日付を入力して西暦を求められます。

参考

• 実装にあたり「日本暦日原典」および when.exe を参考にしています。