[Mew-dist 08282] Re: virtual folder

[Kyotaro HORIGUCHI]

堀口です.

 ちょっと話が違いますが, 以前 Mew-dist:08101 の中で,
Mew1.94b14/im-110/Meadow 1.03a/WinNT で Virtual folder から日本語
フォルダにあるメッセージを読みにいけない問題を直すパッチを出しま
したが, im-111 には入っていないようですのでもう一度お願いしま
す. 下につけているのは im-111 へのパッチです.

At Thu, 25 Mar 1999 20:02:00 +0900, Yoshinari NOMURA <nom at example.com> wrote in <19990325200147U.nom at example.com>
> Emacs 19.34 / Mule 2.3 (SUETSUMUHANA) で virtual folder を使おう
> とすると、imls に --grep='漢字' が正常に渡せていないようです。
> 僕だけの問題でしょうか。
> 
> emacs-20.3 では正常に動作します。

 OS, Mew/IM のバージョンを書いたほうがいいと思います.

--
堀口恭太郎

============================================================
*** Scan.pm.org	Tue Mar 23 18:13:06 1999
--- Scan.pm	Thu Mar 25 20:14:02 1999
***************
*** 19,24 ****
--- 19,25 ----
  use IM::Util;
  use IM::EncDec qw(mime_decode_string);
  use IM::Address qw(extract_addr fetch_addr);
+ use IM::Japanese;
  use integer;
  use strict;
  use vars qw(@ISA @EXPORT);
***************
*** 240,246 ****
      if ($path =~ /(.*)\/([0-9]+)$/) {
  	# xxx how about news?
  	$Head{'number:'} = $2;
! 	$Head{'folder:'} = '+' . substr($1, length(mail_path()) + 1);
      }
  
      open(MSG, "<$path") || return;
--- 241,248 ----
      if ($path =~ /(.*)\/([0-9]+)$/) {
  	# xxx how about news?
  	$Head{'number:'} = $2;
! 	$Head{'folder:'} = 
! 	    conv_iso2022jp('+' . substr($1, length(mail_path()) + 1));
      }
  
      open(MSG, "<$path") || return;
============================================================