vine-default-uim-el.el 1.3 KB

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