[Mew-dist 09461] Re: mew-summary-mark-regexp (Re: b35)
Kazu Yamamoto ( 山本和彦 )
kazu at example.com
1999年 6月 24日 (木) 16:54:25 JST
From: Hideyuki SHIRAI (白井秀行) <shirai at example.com>
Subject: [Mew-dist 09458] mew-summary-mark-regexp (Re: b35)
Date: Thu, 24 Jun 1999 15:26:44 +0900
> と "*" がついてしまいます。その後、どうにかなっちゃうとも思えま
> せんが。
するど過ぎ。:-)
--かず
-------------- next part --------------
Index: mew-mark.el
===================================================================
RCS file: /usr/home/kazu/cvsroot/Mew/mew/mew-mark.el,v
retrieving revision 1.70
diff -c -r1.70 mew-mark.el
*** mew-mark.el 1999/06/04 05:58:44 1.70
--- mew-mark.el 1999/06/24 08:04:33
***************
*** 381,388 ****
(save-excursion
(goto-char (point-min))
(while (re-search-forward regex nil t)
! (if (not (mew-summary-marked-p))
! (mew-summary-mark-as mew-mark-review))))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;
--- 381,389 ----
(save-excursion
(goto-char (point-min))
(while (re-search-forward regex nil t)
! (if (or (mew-summary-marked-p) (mew-in-decode-syntax-p))
! ()
! (mew-summary-mark-as mew-mark-review))))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;
Mew-dist メーリングリストの案内