ken_taka
fctak****@mbd*****
2004年 3月 16日 (火) 00:33:36 JST
ken_taka と申します。 うう・・・面白そうなネタ。し、しかし納期が・・・(^^; とりあえず思いついただけで検証してませんが、銭谷さんの考え通りで いけそうな気がしますね。 つまりエイリアスを POSIX path に変換する部分で (POSIX path of choose file) as unicode text としてあげると良いような。 # クォートしてあげる必要があるかも On 2004年 3月 15日 , at 11:56 PM, Seiji Zenitani wrote: > AppleScript を使って、Mac 標準の > ファイルオープンダイアログを呼び出すことができました。 > コードは下の通りです。 > > ;; Open file > (defun mac-open-file () > (interactive) > (let ((file "")) > (setq file > (do-applescript "try > POSIX path of (choose file) > end try")) > (if (> (length file) 3) > (find-file (substring file 1 (- (length file) 1)))) > )) > > ;; ↓ Command + O にバインド > (setq mac-command-key-is-meta nil) > (global-set-key [(alt o)] 'mac-open-file) > > > パス名が英語の場合は問題なく使えます。 > 日本語が含まれているパス名がまだ扱えませんが(※) > 良い解決法はありませんでしょうか・・・? > > -- > 銭谷誠司 > > > ※ 取得したファイル名(変数 : file)を評価すると、 > \216\226\226 ... のような文字化けした文字列が入っています。 > そして、この文字列を*Message* バッファから > 別の場所にコピー&ペーストすると > /Users/ ... /Documents/事務書類/03_2k.doc > という日本語ファイル名に戻ってくれます。 > ですから、encoding? Unicode? をきちんと扱えば > 日本語パス名も使えそうだと感じています。 -- ken_taka (=_=) : Ken Takano email : fctak****@mbd*****