source: projects/specs/trunk/I/IIIMECF/vine-default-IIIMECF.el @ 2750

Revision 2750, 1.7 KB checked in by munepi, 13 years ago (diff)

updated emacs, emacs24, wl, yatex, auctex, IIIMECF; added wl-beta; supported new vine-default
Line 
1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2;;  -*- coding: utf-8-unix -*-
3;;  FSF Emacs 23 用 Vine Linux IIIMECF 設定
4;;    Munehiro Yamamoto <munepi@vinelinux.org>
5;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
6
7;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
8;; Atok for X の設定
9;;  IIIMP 経由で実行します
10;; (要 MULE-UCS, IIIMECF)
11;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
12(if (or (equal emacs-ime "iiimecf")
13        (equal emacs-ime "IIIMECF")
14        (equal emacs-ime "atokx")
15        (equal emacs-ime "atokx2")
16        (equal emacs-ime "atokx3"))
17    (progn
18      ;; (setq iiimcf-server-control-hostlist '("localhost"))
19      (setq iiimcf-server-control-hostlist
20            (list
21             (concat "/tmp/.iiim-" (user-login-name) "/:0.0")
22             "localhost"
23             ;; "必要であれば、setq で継ぎ足して、ホストを追加していく。"
24             ))
25
26      ;; (require 'un-define)
27      ;; (setq coding-category-utf-8 'utf-8)
28
29      (require 'iiimcf-sc)
30      (setq iiimcf-server-control-default-language "ja")
31      (setq default-input-method 'iiim-server-control)
32
33      ;; 変換トグルの設定
34      (define-key global-map "\C-\\" 'toggle-input-method)
35      ;; Shift-Space または 半角/全角 でも起動
36      (global-set-key [?\S-\ ] 'toggle-input-method)
37      (global-set-key [zenkaku-hankaku] 'toggle-input-method)
38
39      ;; モードライン表示をすっきりと
40      ;; (setcar default-mode-line-format "")
41
42      )
43  )
44
45;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
46
47(provide 'vine-default-IIIMECF)
48
49;; Local Variables:
50;; mode: emacs-lisp
51;; End:
Note: See TracBrowser for help on using the repository browser.