[mhc:00325] today highlight problem

[Akihiro MOTOKI <mokkun@xxxxxxxxx>]

元木です。

## 変な subject ですが。
「今日」の日付が反転表示されるようになって便利ですが、
ちょっと不具合がありました。emacs-20.5 です。

「今日」の予定が二つあると、二行目の日付のない部分も反転表示されます。
(下の図の '*' 部分が反転表示されているとします。)

ここまではよいのですが、その以降の日付で予定が複数ある場合
(下では 1/18 )、二つ目の予定の日付の部分も 反転表示されてしまします。

01/11  Tue              			      
01/12  Wed*             1月分経費伝票
*********** 13:00-15:00 検討会 [会議室]
01/13  Thu              新年会
01/14  Fri              			      
01/15  Sat  18:20       新年会 [渋谷]	      
01/16 (Sun)             			      
------------------------------------------------------
01/17  Mon              			      
01/18  Tue              1月分経費伝票
***********             防火当番

1/18 の二つ目の予定のときの mhc-sch-scan1() の動作をおってみたところ、
    (setq date-string
	  (cond
	   ((not date) "")
	   (first
	    (concat (ddate-mmdd-s1 date "/") " " (ddate-ww-s2 date) " "))
	   (t "            ")))
をした時点で、すでに date-string に conf face が設定されています。

文字列 "            " に face を設定してしまうと、
その次に同じ文字列を使用したときにも
face が引き継がれてしまうのが原因のようです。

以下のように、文字列ではなく式を評価して空白を生成すると
大丈夫でした。

--- mhc.el~     Tue Jan 11 13:09:19 2000
+++ mhc.el      Wed Jan 12 15:17:52 2000
@@ -249,7 +249,7 @@
           ((not date) "")
           (first
            (concat (ddate-mmdd-s1 date "/") " " (ddate-ww-s2 date) " "))
-          (t "            ")))
+          (t (format "%12s" ""))))
     (if (and color (not mhc-face-week-color-paint-thick))
        (put-text-property 0 (1- (length date-string)) 'face color date-string))
 
━━━━━━━━━━━━………‥・・ ・ 　・　．
  元木 顕弘 / Akihiro Motoki                　　・      ☆
　E-mail: mokkun@xxxxxxxxx, mokkun@xxxxxxxxxxx  　・　  .
          motoki@xxxxxxxxxxxxxxxxx                  ・・