UNIX/学生ツール/elisp/tc
Table of Contents |
(set-language-environment "Japanese") ;;これは無くてもよいかも (setq load-path (cons "/home/student/s1138001/lib/emacs/lisp/tc" load-path)) (require 'tc-setup)
(define-key global-map "\C-o" 'toggle-input-method)
(add-hook 'tcode-ready-hook '(lambda () (tcode-set-key-layout "qwerty")))
(add-hook 'tcode-ready-hook '(lambda () (tcode-set-key-layout "qwerty-us-shift")))