[Mew-dist 05411] imsort

[K_Yamazaki/ やま]

やまざき です。

Emacs20.2, mew-1.93b45, im-94 を使用しています。

最近、"S" で subject を指定して sort しても、
# Mew -> Manipulate folder -> Sort を実行、subject を指定

field=date で、sort されるのを何とかしたかったので、
im-94/imsort を以下のように修正して、使用中です。

これは、わたしの環境がいけなかったのでしょうか?

指定された field が、subject のときに、Subject から、通し番号(?)などを
削除している処理だと思うのですが、field が subject で、
smode(sort mode?)が 'ml' のときに処理されるようになっているように思います。

しかし、ps で確認したところ imsort は mode=text で実行されている
ようなので smode=text でもこの処理するようにしてしまいました。

imsort を mode=ml で実行するように修正するのが、正しいと思うのですが、
どこで指定するのか、調べきれなかったため、安易な修正をしてみました。
# 一応、動いているので

--- diff -c 新 旧
*** imsort      Mon Jul  6 16:29:11 1998
--- imsort.org  Mon Jul  6 16:42:21 1998
***************
*** 171,177 ****
  
      ($_) = /^$field:\s+([^\n]*)/imo;
      if (lc($field) eq 'subject') {
!       if (($smode eq 'ml') || ($smode eq 'text')) {
            s/^[\[\(]([^\]\)]*)[\]\)]\s*//i;
            $1 =~ /^(.*)[:,\s](.*)$/;       $ml=$1; $num=$2;
            s/^(re:\s*)(.*)$/$2$1/i;
--- 171,177 ----
  
      ($_) = /^$field:\s+([^\n]*)/imo;
      if (lc($field) eq 'subject') {
!       if ($smode eq 'ml') {
            s/^[\[\(]([^\]\)]*)[\]\)]\s*//i;
            $1 =~ /^(.*)[:,\s](.*)$/;       $ml=$1; $num=$2;
            s/^(re:\s*)(.*)$/$2$1/i;

-----------------------------------------Email  yama at example.com
 山崎 慶一郎  ＮＥＣソフトウェア 基本ソフトウェア事業部 第二開発部 鈴木課
              TELNET:8-141-2317 (FAX 2456)  TEL:03-5569-3251 (FAX 3308)