From: Satoru Takabayashi <satoru-t@xxxxxxxxxxxxxxxxxx> さん曰く
Subject: [namazu-devel-ja] Re: ichitaro (Re: Re: xlHtml)
Message-ID: <20000228151220N.satoru-t@xxxxxxxxxxxxxxxxxx>
Date: Mon, 28 Feb 2000 15:12:20 +0900
高林> >ヤマカンで附属のパッチの様にすると動いたので、問題なければ修正を
高林> >お願いします。(私は、まだ check in できません) > 高林さん
高林>
高林> 了解です。修正して commit しておきました。
どーもです。
高林> >また、mknmz から『--media-type='application/ichitaro6'』を外すと
高林> >binary file 扱いされるのですが、それはこういうものなのですよね？
高林> diff -r1.12 MMagic.pm
高林> 364c364
高林> < $self->{FILEXTS}->{"$filepat"} = $mtype;
高林> ---
高林> > $self->{FILEEXTS}->{"$filepat"} = $mtype;
ごめんなさい。Win32 だと perl module が真っ当に nmake 出来ないの
で、下記の試験ができません。
高林> File-MMagic に上記のパッチを当てた後に、ichitaro456.pl の
高林> add_magic() に
高林>
高林> my ($magic) = @_;
高林> $magic->addFileExts('\\.jsw', 'application/ichitaro6');
高林>
高林> を加えれば認識できると思います。できれば addSpecials() の
高林> pattern も書けるといいですね。
う〜〜む、jstxt.doc (といってもテキストファイル :-) を見ると、
doc> １．基本機能
doc>
doc> 一太郎Ｖｅｒ．４のＪＳＷファイル
doc> 一太郎Ｖｅｒ．５のＪＡＷファイル
doc> 一太郎Ｖｅｒ．６のＪＢＷファイルからテキストデータを取り出します。
と書いてあります。^^;;;
あと、addFileExts の動きがわからないのですが、upper case も考慮
した方がいいかもしれません。
sub add_magic ($) {
my ($magic) = @_;
$magic->addFileExts('\\.(jsw|JSW)', 'application/ichitaro4');
$magic->addFileExts('\\.(jaw|JAW)', 'application/ichitaro5');
$magic->addFileExts('\\.(jbw|JBW)', 'application/ichitaro6');
return;
}
こんな感じなのでしょうか？
# Just System さんは一時期(いまもかな？) *.j?? という拡張子を勝
# 手(？)に大量に使っていました。
高林> ># さてさて、taro6.jsw はどうしましょうか？メールで送りましょうか？
高林>
高林> 送ってくださいませ。
これも良く見たら、taro6.jbw でした。また、author などは書く場所
がまったくわからなかったので本文中に埋め込んであります。
# 関係ない人ごめんなさい。Win32 な人は試験みて下さい。Attachment:
taro6.jbw.gz
Description: Binary data