[Mew-dist 11368] Re: how to delete forever a specific message?

[Hideyuki SHIRAI ( 白井秀行 )]

From: Masaki SHIGEMORI <shige2 at example.com> さん曰く
Subject: [Mew-dist 11366] Re: how to delete forever a specific message?
Message-ID: <3833D1AE273.D34ESHIGE2 at example.com>
Date: Thu, 18 Nov 1999 19:15:12 +0900

shirai> でっちあげてみました。^^;;;
重森> ありがとうございます！

ど〜〜も。

重森> ところで、ちょっと変なところを発見しました ^^;
重森> @ や * があるメッセージの上で mew-summary-remove-message すると、削除
重森> 完了後もリストからメッセージが消えません（実体はちゃんと消えています）。

自分でも一か所いけないところをみつけたので、計二か所ほど置き換え
て下さい。^^;;;

-	   (setq msgs (list (mew-summary-message-number))))
+	   (setq msgs (delete nil (list (mew-summary-message-number)))))

-				     (concat "^ *" msg " +") nil t))
+				     (concat "^ *" msg "[^0-9]") nil t))

-- 
白井秀行 (mailto:shirai at example.com)