[mhc:01791] Re: mew4:mew-summary-next-line

[KOIE Hidetaka (鯉江英隆) <hide@xxxxxxxx>]

  Message-Id: <20030415.183849.69231811.shirai@xxxxxxxxxxxxxxxxxxx>
  Date:       Tue, 15 Apr 2003 18:38:49 +0900 (JST)
  From:       Hideyuki SHIRAI (白井秀行) <shirai@xxxxxxxxxxxxx>
  Subject:    [mhc:01790] Re: mew4:mew-summary-next-line

  | Mew 4 では確かめられないのですが、mhc-mew.el で
  | 
  | (defconst mhc-mew/header-string
  |   (let ((str "0 | "))
  |     (put-text-property 0 (length str) 'invisible 'mhc str)
  |     str))                                        ~~~~
  | 
  | (defconst mhc-mew/header-string-review
  |   (let ((str (concat "0" (char-to-string mew-mark-review) "| ")))
  |     (put-text-property 0 (length str) 'invisible 'mhc str)
  |     str))                                        ~~~~
  | 
  | と invisible に 'mhc を設定するとどうでしょうか。

うまいです。
あとはmewが (eq (get-text-property (point) 'invisible) t) と
比較しつづけてくれることを祈るだけ。

--
鯉江英隆 <hide@xxxxxxxx>