[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 メーリングリストの案内