猫熊は燃えつきた？！日記

○ 放火

うーむ、昨日の夜もあった。前日とっ捕まった奴は現行犯逮捕だったのだが、連続放火の犯人かどうかはわかっていない。もう一人？

○ 出動

子供会の役員会があって 22:45 ぐらいに終わったのだが、町会の会館を出たときに、隣の消防車の車庫で消防団の人達が見回りに出動する準備をしていた。ご苦労さまです。

○ 野球

今度は、マー君完封！！

○ 月曜日始まり？日曜日始まり？

MHC に CW(Calendar Week Number) を導入してから、MHC のカレンダーは月曜日始まりにしていた。gemcal も改造して月曜日始まりにしていて、この前から使い出した Google カレンダーも月曜日始まりにしていたのだ。唯一、MHC の Postscript カレンダーは何回トライしても玉砕したので日曜日始まりだった。

身の回りにある紙のカレンダーは大抵日曜日始まりだったが、紙とコンピュータで意識が勝手に切り替わるようで、まったくトラブルは無かった。

が、しかし、突然思うところがあり、すべて日曜日始まりに変えた。ちょっとの間は曜日を間違える可能性がありそうなので、注意！注意！！

○ MHC での day-of-week 切り替え

(add-hook 'mhc-mode-hook
	  (lambda ()
	    (define-key mhc-prefix-map "w" 'mhc-day-of-week)))
 
(add-hook 'mhc-calendar-mode-hook
	  (lambda ()
	    (define-key mhc-calendar-mode-map "w" 'mhc-day-of-week)))
  
(defun mhc-day-of-week ()
  (interactive)
  (when (or (and (boundp 'mhc-mode) mhc-mode)
	    (eq major-mode 'mhc-calendar-mode))
    (if (eq mhc-start-day-of-week 1)
	(progn
	  (setq mhc-start-day-of-week 0)
	  (setq mhc-summary-use-cw nil)
	  (setq mhc-calendar-use-cw nil))
      (setq mhc-start-day-of-week 1)
      (setq mhc-summary-use-cw t)
      (setq mhc-calendar-use-cw 'week))
    (mhc-reset)
    (message "MHC: %s曜日始まり"
	     (if (eq mhc-start-day-of-week 1) "月" "日"))))

○ 明日に向けて腹減った

前回が 2006年8月で確か「4年後ね」といわれた記憶があるのだが、まだ3年しか経っていないような。。。;_;

前回は、お食事セットを貰ってそいつを食べたんだけど、今度は自主性に任されて？いる。明日はなるだけ楽をしたいので、朝から少なめの量のうどんとか具なしスープで一日を生きてきたんだが、すでに腹減った。ダンの散歩をあんなにしなきゃ良かったかも。

○ 三沢死す

同い年かぁ〜。合掌

いくらマットが良くなったとはいえ、限界があるもんな。