[Mew-dist 09845] Re: imls + IMAP4 + Thread=yes

SAKAI Kiyotaka ksakai at example.com
1999年 7月 28日 (水) 13:52:35 JST


>> In article <19990727204133F.shirai at example.com>, Hideyuki SHIRAI (白井秀行) <shirai at example.com> writes:

> 報告だけなのですが、IMAP4 経由で thread 表示しようとすると以下の
> エラーになります。

> % imls --thread=yes %#mh/tmp
> Undefined subroutine &IM::Imap::make_thread called at /usr/local/lib/perl5/site_perl/5.005/IM/Imap.pm line 835, <SOCK> chunk 43.

MsgStore.pm と同じようにコメントアウトしてしまえばいいと思います。
-- 
酒井 清隆 (E-mail: ksakai at example.com)
-------------- next part --------------
Index: Imap.pm
===================================================================
RCS file: /home/ksakai/cvsroot/im-117/IM/Imap.pm,v
retrieving revision 1.1.1.1
diff -u -c -r1.1.1.1 Imap.pm
*** Imap.pm	1999/07/09 07:13:40	1.1.1.1
--- Imap.pm	1999/07/28 04:50:11
***************
*** 832,843 ****
  	$Head{'folder:'} = "\%$folder";
  	parse_header(\%Head);
  
! 	if ($main::opt_thread) {
! 	    &make_thread(%Head);
! 	} else {
  	    &disp_msg(\%Head);
  	    $count++;
! 	}
  	$resp = &next_response($HANDLE);
      }
      if ($resp !~ /^im$seq OK/) {
--- 832,843 ----
  	$Head{'folder:'} = "\%$folder";
  	parse_header(\%Head);
  
! #	if ($main::opt_thread) {
! #	    &make_thread(%Head);
! #	} else {
  	    &disp_msg(\%Head);
  	    $count++;
! #	}
  	$resp = &next_response($HANDLE);
      }
      if ($resp !~ /^im$seq OK/) {


Mew-dist メーリングリストの案内