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")))


xrea