[Mew-dist 780] Re: mew-attach-undo

[SAKAI Kiyotaka]

>> In article <19970331013126Q.fuji0924 at example.com>, OKUNISHI Fujikazu <fuji0924 at example.com> writes:

僕> 1.67 で気づいたのですが、Attach でマークをキャンセル `U' できません。

> の件で、1.68 でも再現しました。

こちらでは再現しないのですが、具体的にどのような手順をとるとエラーが発
生するのでしょうか？

これとは別に、attachment の最後に改行が挿入されるようになったにもかか
わらず mew-attach-line が変更されていないため、ending boundary で
(mew-attach-line) を実行しても -1 が返らない問題を見つけました。
これを修正するパッチです。
-- 
酒井 清隆 (E-mail: ksakai at example.com)


===================================================================
RCS file: RCS/mew-attach.el,v
retrieving revision 1.1
diff -u -r1.1 mew-attach.el
--- mew-attach.el	1997/03/31 02:37:09	1.1
+++ mew-attach.el	1997/03/31 02:46:50
@@ -145,7 +145,7 @@
       (goto-char (point-max))
       (beginning-of-line)
       (setq max (count-lines (marker-position mew-draft-buffer-attach)(point)))
-      (if (= ret max) -1 ret)
+      (if (or (= ret max) (= ret (1- max))) -1 ret)
       )
     ))