Skip to content

emacs-jp/japanese-holidays

Folders and files

NameName
Last commit message
Last commit date

Latest commit

 

History

39 Commits
 
 
 
 
 
 
 
 

Repository files navigation

japanese-holidays.el

このプログラムは、Emacs の calendar に、本の祝日を表示できるように設定するものです。

M-x calendar で起動します。

japanese-holidays.jpg

Getting Started

使用するには japanese-holidays.elload-path の通った所に置き、 ~/.emacs.d/init.el に以下の設定を追加します。

(with-eval-after-load "holidays"
  (require 'japanese-holidays)
  (setq calendar-holidays ; 他の国の祝日も表示させたい場合は適当に調整
        (append japanese-holidays holiday-local-holidays holiday-other-holidays))
  (setq calendar-mark-holidays-flag t)	; 祝日をカレンダーに表示
  ;; 土曜日・日曜日を祝日として表示する場合、以下の設定を追加します。
  ;; デフォルトで設定済み
  (setq japanese-holiday-weekend '(0 6)	   ; 土日を祝日として表示
        japanese-holiday-weekend-marker	   ; 土曜日を水色で表示
        '(holiday nil nil nil nil nil japanese-holiday-saturday))
  (add-hook 'calendar-today-visible-hook 'japanese-holiday-mark-weekend)
  (add-hook 'calendar-today-invisible-hook 'japanese-holiday-mark-weekend))

便利な設定

  • “きょう” をマークするには、次の設定を追加します。
(add-hook 'calendar-today-visible-hook 'calendar-mark-today)
  • "月" の表記を日本の書式とするには、次の設定を追加します。
(setq calendar-month-name-array ["1月" "2月" "3月"  "4月"  "5月"  "6月"
                                 "7月" "8月" "9月" "10月" "11月" "12月"]
      calendar-month-header '(propertize
                              (format "%d%s" year (calendar-month-name month))
                              'font-lock-face 'calendar-month-header))
  • 曜日の表記を日本の書式とするには、次の設定を追加します。
(setq calendar-day-header-array ["" "" "" "" "" "" ""])

About

calendar functions for the Japanese calendar

Resources

Stars

Watchers

Forks

Releases

No releases published

Packages

No packages published