[mew-dist 23236] Re: NNTP scan problem
Kazu Yamamoto ( 山本和彦 )
kazu at example.com
2003年 3月 12日 (水) 20:16:41 JST
From: Kazuyoshi Kunisawa <fkazu at example.com>
Subject: [mew-dist 23182] Re: NNTP scan problem
> 言い替えると、Mew は XOVER で全ての overview (1-118) を取り
> に行き、その結果も全て受け取っている筈なのに、最初の記事 1
> から ARTICLE せず 110 から始めてしまうのです。
分りました。NNTP サーバのバグです。XOVER は、要素を tab で区切らないと
いけませんが、このサーバの出力には番号の後に spc があります。
これで直るんじゃないでしょうか?
--かず
Index: mew-nntp.el
===================================================================
RCS file: /cvsroot/mew/mew/mew-nntp.el,v
retrieving revision 1.93
diff -c -r1.93 mew-nntp.el
*** mew-nntp.el 2003/03/10 09:42:17 1.93
--- mew-nntp.el 2003/03/12 11:17:25
***************
*** 121,127 ****
uid uidl siz rtr rtrs rttl hlds)
(goto-char (point-min))
;; num subj from date msg-id ref siz lines
! (while (re-search-forward "^[0-9]+\t[^\t]*\t[^\t]*\t[^\t]*\t<\\([^\t]+\\)>\t[^\t]*\t\\([0-9]+\\)" nil t)
(setq uid (mew-match-string 1))
(setq siz (mew-match-string 2))
(if (string= uid "") (setq uid nil))
--- 121,128 ----
uid uidl siz rtr rtrs rttl hlds)
(goto-char (point-min))
;; num subj from date msg-id ref siz lines
! ;; " ?" is for buggy servers.
! (while (re-search-forward "^[0-9]+ ?\t[^\t\n]*\t[^\t\n]*\t[^\t\n]*\t<\\([^\t\n]+\\)>\t[^\t\n]*\t\\([0-9]+\\)" nil t)
(setq uid (mew-match-string 1))
(setq siz (mew-match-string 2))
(if (string= uid "") (setq uid nil))
Mew-dist メーリングリストの案内