source: projects/specs/trunk/u/uim/vine-default-uim-el.el @ 1720

Revision 1720, 1.3 KB checked in by iwaim, 14 years ago (diff)

uim 1.6.0-2

RevLine 
[1720]1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2;;  -*- coding: utf-8-unix -*-
3;;  FSF Emacs 23 用 Vine Linux uim-el 設定
4;;    IWAI, Masaharu <iwai@alib.jp>
5;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
6
7;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
8;; uim-el の設定
9;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
10
11(if
12    (or (equal emacs-ime "uim")
13        (equal emacs-ime "uim-el"))
14    (progn
15     
16      ;; uim.elを読み込む
17      (require 'uim)
18      ;; Emacs起動時に読み込んでほしくない場合は,上記をコメントアウトし,
19      ;; 代わりに下記の行をアンコメント
20      ;;(autoload 'uim-mode "uim" nil t)
21     
22      ;; uim-modeをトグルするためのキーバインド (C-oを使う場合の例)
23      (global-set-key "\C-o" 'uim-mode)
24      )
25  (if
26      (equal emacs-ime "uim-leim")
27      (progn
28       
29        ;; uim.elを読み込みEmacsへIMを登録する
30        (require 'uim-leim)
31       
32        ;; デフォルトのIMをuim提供のものに設定
33        (setq default-input-method "japanese-anthy-utf8-uim")
34        )))
35
36;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
37(provide 'vine-default-uim-el)
38
39;; Local Variables:
40;; mode: emacs-lisp
41;; End:
Note: See TracBrowser for help on using the repository browser.