[mhc:00195] Re: 旧版のスケジュールフォルダ参照

[Yoshinari Nomura <nom@xxxxxxxxxxxxxxxxxxx>]

乃村 @ 病床(風邪) です。

On Wed, 13 Oct 1999 12:09:01 +0900,
	井上　潔(Kiyoshi Inoue) <inoue@xxxxxxxxxx> said:

> Mule-2.3での動作、順調です。:-)

mhc-0.23 のリリース遅れています。mule 2.3 based on emacs 19.28
で動かんぞという方は、とりあえず

  http://www.swlab.csce.kyushu-u.ac.jp/~nom/prj/mhc/mhc-snap19991005.tar.gz

を使って下さい。

> ところで、旧版のフォルダ(2桁の 98 とか 99 とか…)を容易に参照
> できる方法はあるでしょうか。特に、過去のファイルを CD-R に焼い
> たりしていると、ちょっとやっかいだなーという声が上がっているのです。
> いわゆる、後方互換性ってやつだと思うのですが、現状はどのように
> なっているでしょう。

確認ですが、

    旧版のメッセージが混在しても大丈夫なので、
    mv 98 1998 などとして、そのなかに新旧まとめてぶちまける。

では不十分で、2桁の 98 のままで参照したいということですよね。

# 旧版というのは、1994年頃〜半年前頃までに流通していたバージョ
# ン 0.10 以前の物のことです。最近のユーザは関係ありません。

以下のパッチで、mscan + mhc.el から見る分には救えそうです。
が、100年後に苦労しますよ。:-)
--
nom


Index: mscan
===================================================================
RCS file: /u/nom/prj/cvsroot/mhc/mscan,v
retrieving revision 1.1.1.1
diff -u -r1.1.1.1 mscan
--- mscan	1999/10/07 10:09:06	1.1.1.1
+++ mscan	1999/10/13 05:30:29
@@ -350,7 +350,9 @@
     if ($palmFLG){
 	@files = (<$ScheduleDir/$palm_queue/*>);
     } else {
-	@files = (<$scDir/*>, <$ScheduleDir/$intersect/*>);
+	$scDir_old = $scDir;
+	$scDir_old =~ s/\d\d(\d\d\/\d\d)$/$1/;
+	@files = (<$scDir_old/*>, <$scDir/*>, <$ScheduleDir/$intersect/*>);
     }
     foreach (@files){
 	next if (! /\/\d+$/);