uim スレッド 7 - 暇つぶし2ch

uim スレッド 7 ..

■コピペモード
□スレを通常表示
□オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト

929:login:Penguin
 07/11/20 11:18:07 0yEs4h1F
uim-tutcodeで全角モードの切り替えを 
直接入力の時はしないようにしたいんだけど 
どうすればいいの？

930:923
 07/11/20 22:10:00 Ht+nItcs
>>929 
Alternative input methodに>>926の全角英数専用IM(ja-wide)を設定していて、 
uim-tutcodeの直接入力モード時にはja-wide IMへの切り替えを無効にしたい、 
ということでしたら、現状ではできません。

931:login:Penguin
 07/11/22 07:01:04 ZhLITlti
>>930 
.uim で key-press-handler を書き替えたらそれっぽくなった。 
一応報告しとく。 
 
(define key-press-handler 
　(lambda (id key state) 
　　(let* ((c (find-context id)) 
　　 (im (and c (context-im c))) 
　　 (cur-im-name (im-name im))) 
　　　(cond 
　　　 ((and enable-im-toggle? 
　　　 (toggle-im-key? key state) 
　　　 (or (and (= cur-im-name 'tutcode) (tutcode-context-on? c)) 
　　　　　　(= cur-im-name 'ja-wide))) 
　(toggle-im id c)) 
　　　 ((and enable-im-switch 
　　　 (switch-im-key? key state)) 
　(switch-im id (im-name im))) 
　　　 ((modifier-key? key state) 
　(im-commit-raw c)) 
　　　 ((and (tutcode-vi-escape-key? key state) tutcode-use-with-vi? 
　　　　(= cur-im-name 'ja-wide)) 
　　　　(toggle-im id c) 
　　　　(set! c (find-context id)) 
　　　　(tutcode-context-set-state! c 'tutcode-state-off) 
　 (im-commit-raw c)) 
　　　((and (tutcode-on-key? key state) tutcode-use-with-vi? 
　　　　(= cur-im-name 'ja-wide)) 
　　(toggle-im id c)) 
　　　(else 
　(invoke-handler im-key-press-handler id key state))))))

次ページ