[Mew-dist 09120] Re: b31

[Hideyuki SHIRAI ( 白井秀行 )]

xcite, mew-dist 広報担当(？)の白井です。

From: SUGIMORI (杉森 隆行) <taro at example.com> さん曰く
Subject: [Mew-dist 09116] Re: b31
Message-ID: <19990603202040S.taro at example.com>
Date: Thu, 3 Jun 1999 20:17:17 +0900

> mew-1.94b31.tar.gz を ftp.mew.org:/pub/Mew/beta に置きました。

杉森> mew単体ではエラーにならないので、ここに報告するのも何なのですが、
杉森> mew-1.94b31とxciteの組みあわせでエラーが出るようになってしまいました。
杉森> draftバッファでxciteにて引用するとエラーがでます。
杉森> mew オリジナルの引用をすると大丈夫です。
杉森> でも、エラーになっているのは mew の関数内(mew-header-set)です。

このバックトレースだと誤解されそうなので、もうちょっと、付け加え
ておくと。。。

杉森> Signaling: (args-out-of-range 0 1)
杉森>   put-text-property(0 1 front-nonsticky t)
 <<snip>>
杉森>   mew-draft-cite(nil)
杉森>   xcite-goto-article-window()

ここで、mew-draft-cite(nil) なのは、xcite で

	  (let ((mew-cite-hook '(lambda ())))
	    (set-buffer (get-buffer-create " *xcite tmp*"))
	    (erase-buffer)
	    (condition-case err
		(mew-draft-cite nil t) <== ここがエラーになったから
	      (error (mew-draft-cite nil))) <== こっちが動いた。

とやっているからです。
condition-case で守られているところのエラーも同様のエラーです。
xcite からでなくても、上記の様に、空っぽのバッファに対して
(mew-draft-cite nil t) をするとエラーになります。

出来たら Mew の方で対応して欲しい内容なんじゃないかなぁと思いま
す。


それまで待てない xcite ファンの方へ

	  (let ((mew-cite-hook '(lambda ())))
	    (set-buffer (get-buffer-create " *xcite tmp*"))
	    (erase-buffer)
	    (insert "This is dummy line.\n")
	    (condition-case err
		(mew-draft-cite nil t)
	      (error (mew-draft-cite nil)))
	    (save-excursion
	      (goto-char (point-min))
	      (forward-line)
	      (delete-region (point-min) (point)))
	    (setq major-mode 'mew-message-mode)

とでもして、ガードしておきましょう。^^;;;

-- 
白井秀行＠大体動いた :-)