[Mew-dist 11358] Re: delete/refile error

[Hideyuki SHIRAI ( 白井秀行 )]

白井です。

# ごめんなさい、"Running" は表示されますね。(_ _)

From: Masahiko Joichi <joichi at example.com> さん曰く
Subject: [Mew-dist 11357] Re: delete/refile error
Message-ID: <19991117173033X.joichi at example.com>
Date: Wed, 17 Nov 1999 17:32:32 +0900


城市> .im/Config の Form を確認しましたが、"Form=%+5n %m%d %-18P %-40S %b"

城市> 実際の動作ですが、refileを指定すれば"o"が、deleteを指定すれば"D"が
城市> マークの位置に表示されて、それなりにその行の色も変わります。
城市> ここまでは問題無く動作しているみたいなんです。

From: Masahiko Joichi <joichi at example.com> さん曰く
Subject: [Mew-dist 11340] Re: delete/refile error
Message-ID: <19991116201055G.joichi at example.com>
Date: Tue, 16 Nov 1999 20:11:21 +0900

城市> で、前回のメールでBacktraceが取れなかったと書きましたが、やり方
城市> 間違えてた様で採取できました。添付します。

のエラーが原因で変な風になっていて、城市さんのおっしゃる通り
mew-mark-delete-switch には問題がないのなら、

-------------------------------------

(defun mew-mark-delete-region (begin end)
  (setq zzz nil)
  (mew-elet
   (let ((m (make-marker))
	 (regex (concat mew-summary-message-regex "\\([^ +0-9]\\)")))
     (set-marker m end)
     (goto-char begin)
     (while (re-search-forward regex m t)
       (setq zzz (append (list (mew-match 2)) zzz))
       (funcall (cdr (assoc (string-to-char (mew-match 2))
			    mew-mark-delete-switch))))
     (set-buffer-modified-p nil))))
-------------------------------------

を *scratch* で評価して "x" した後に zzz という変数が例えば

zzz^J
("o" "o" "o" "D" "D" "D" "D")

となるのですが、この中に変な文字が含まれていませんか？

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