« 牡蠣初め&水族館 | トップページ | ランタン祭り »

2010年2月16日 (火曜日)

mhc の週番号がズレた?

週番号表示していい感じな mhc だったんですが、 2010 年に入ってから会社のカレンダーに表示されてる週番号より1週間進んでる気が…。きっと気のせい…と、しばらく放置してたけど、先週、帯状疱疹の痛みがひどくて1週間自宅勤務させてもらった時に、少しだけ調べて暫定(きっとこのまま恒久…)対策したメモ。

現在の、週の始まりを月曜日にする設定 (setq mhc-start-day-of-week 1) だとズレるようで、日曜日に設定 (setq mhc-start-day-of-week 0) すると大丈夫みたい。でもやっぱり会社のカレンダーに合わせて、週の始まりは月曜日を希望。

なんか週番号の数え方のルールっていくつかあったと思うので、もしかしたら mhc の不具合ではないかも知れないけど、ちゃんと調べる時間もないので、ここら辺の情報をもとに少し変更して取り敢えず…

;;; >>>>--> temp. workaround for mhc-date-cw (wrong week number ?)
(add-hook 'mhc-setup-hook
          (lambda ()
;;; from: http://www.quickhack.net/mhc/mhonarc/msg01631.html
;;; XXX: It has the Y2038 problem.
            (defsubst mhc-date-cw (date)
              (cond
               ;; ((= mhc-calendar-start-day-of-week 1) ;; kk
               ((= mhc-start-day-of-week 1) ;; kk
                (string-to-number (format-time-string "%V" (mhc-date-to-second date))))
               (t
                (string-to-number (format-time-string "%U" (mhc-date-to-second date))))))
            ;; reload source files to reflect the change of mhc-date-cw inline function
            (load "mhc-calendar.el")
            (load "mhc-summary.el")
            (load "mhc.el")
            ))
;;; <--<<<< temp. workaround for mhc-date-cw (wrong week number ?)

…などと .emacs に書いたら、会社のカレンダーの週番号と一致するようになったので、よしとしますか。 2038 年も emacs 使ってるんかなー?>おれ
因みに、元々、モードラインには日付を (setq display-time-format "%x (wk%V-%a) %R (%z)") な感じで表示してて、ココでも %V を週番号に使ってたのでした。

そうそう、 mhc は mhc-current-snap20100120 にしました。

|

« 牡蠣初め&水族館 | トップページ | ランタン祭り »

Emacsen」カテゴリの記事

コメント

コメントを書く



(ウェブ上には掲載しません)


コメントは記事投稿者が公開するまで表示されません。



トラックバック

この記事のトラックバックURL:
http://app.cocolog-nifty.com/t/trackback/144752/47580151

この記事へのトラックバック一覧です: mhc の週番号がズレた?:

« 牡蠣初め&水族館 | トップページ | ランタン祭り »