[過去ログ]
NTEmacs スレッド 3 (981レス)
NTEmacs スレッド 3 http://anago.5ch.net/test/read.cgi/software/1325573999/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
必死チェッカー(本家)
(べ)
自ID
レス栞
あぼーん
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
223: 名無しさん@お腹いっぱい。 [sage] 2012/08/23(木) 19:14:48.22 ID:VEO4vW+O0 >>179 の発展系として、以下のマクロを考えてみた。 (defmacro set-function-args-coding-system (function program-number args-number) `(defadvice ,function (around ,(intern (concat "ad-" (symbol-name function) "-function-args-coding-sytem-setup")) activate) (let ((program (ad-get-arg ,program-number)) (args (ad-get-args ,args-number))) (if (and program args) (progn (ad-set-args ,args-number (mapcar '(lambda (arg) (if (multibyte-string-p arg) (encode-coding-string arg 'cp932) arg)) args)) (if (and (equal program shell-file-name) (equal (car args) shell-command-switch) (cdr args)) (let ((process-coding (assoc-default (cadr args) process-coding-system-alist 'string-match))) (if process-coding (let ((coding-system-for-read (car process-coding)) (coding-system-for-write (cdr process-coding))) ad-do-it) ad-do-it)) ad-do-it)) ad-do-it)))) http://anago.5ch.net/test/read.cgi/software/1325573999/223
224: 名無しさん@お腹いっぱい。 [sage] 2012/08/23(木) 19:15:48.72 ID:VEO4vW+O0 設定は以下で行ってください。説明は次に。 (set-function-args-coding-system call-process-region 2 6) (set-function-args-coding-system call-process 0 4) (set-function-args-coding-system start-process 2 3) http://anago.5ch.net/test/read.cgi/software/1325573999/224
225: 名無しさん@お腹いっぱい。 [sage] 2012/08/23(木) 19:17:03.45 ID:VEO4vW+O0 (説明) process-coding-system-alist は、shell-command などでshell経由(bash -c xxx)で 起動されるプロセスには機能しない。上記は、これを有効にするアドバイス。 たとえば、M-! ipconfig とやると、プロセスの入出力の設定を UTF-8 にしているユーザは 文字化けするけれども、上記のアドバイスを設定し、さらに以下を設定しておくと、文字化けは しなくなる。 (modify-coding-system-alist 'process "ipconfig" 'cp932) http://anago.5ch.net/test/read.cgi/software/1325573999/225
229: 名無しさん@お腹いっぱい。 [sage] 2012/08/23(木) 20:49:02.41 ID:VEO4vW+O0 >>228 仕組みはこんな感じ? (defadvice comint-send-input (before ad-comint-send-input activate) (set-process-coding-system (get-process "shell") 'undecided 'utf-8)) http://anago.5ch.net/test/read.cgi/software/1325573999/229
230: 名無しさん@お腹いっぱい。 [sage] 2012/08/23(木) 20:50:14.75 ID:VEO4vW+O0 >>227 ほんとだ。がっがり。でも、勉強となったし、この情報を教えてもらう ネタになったからいいか。 >>223 の利点は、標準入力をコントロールできることくらいかな。 http://anago.5ch.net/test/read.cgi/software/1325573999/230
233: 名無しさん@お腹いっぱい。 [sage] 2012/08/23(木) 23:13:29.37 ID:VEO4vW+O0 おぉ、勉強になるなぁ。 最近、文字化けした漢字を見なくなった。 http://anago.5ch.net/test/read.cgi/software/1325573999/233
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.029s