Pier で日本語
テキスト・ファイルをアップロードして，それを Embeded Link させると文字化けする場合がある．これを回避するためのチェンジ・セット．
!MAExternalFileModel methodsFor: 'accessing-dynamic' stamp: 'nsh 7/29/2007 06:37'!readStream | stream | stream := self directory readOnlyFileNamed: self filename. self isText ifTrue: [^ stream converter: UTF8TextConverter new]. ^ stream binary! !!PRFile methodsFor: 'accessing' stamp: 'nsh 7/31/2007 07:47'!contents ^ file contents
PRFile に contents メソッドを持たせるべきか， PRViewRenderer の visitFile: で ifTrue: [ ^ html preformatted: anObject contents ]. を ifTrue: [ ^ html preformatted: file contents ]. とすべきかは悩むところだけど， visitFile: を送るのは PRFile の accept: だけなので， PRCase に合わせて， PRFile の方に追加してみた．
中身がUTF8という仮定ですね。適宜指定できればいいのですが、面倒ですかね。
返信削除うちは UTF8 がデフォルトなので問題ないです (笑)．適宜指定って，プリファレンスみたいなのを持たせるということですか？ それとも自動判別しろと？
返信削除あ、自動判定できればいいですね。または、ファイルのプレファレンスにエンコードを追加ですか。
返信削除