MeadowへT-codeをインストールした時のメモ

インストール

1. tc-2.3.1.tgzを落としてきて解凍する．
2. INSTALLの「4. Windows でのインストール」を読む．
3. emacsというディレクトリを作るのが好きじゃないので， lispのコードはsite-lispへ置き．~/emacs/tcodeのかわりに~/tcodeを作る．
4. tc2のlispディレクトリの中身を~/site-lispへコピーする．また， tc2のetcの下のEELLLTXT，bushu.rev，symbol.rev を ~/tcodeへコピーする． mazegakiの下も全部コピーする。
5. site-lisp/tc-pre.elを編集する． 「(defconst tcode-site-data-directory」の 定義を「~/tcode/」にする．「/」で終わらないといけないらしい．
6. M-x cdで，~/site-lispに行く．byte-compile-fileで，

   tc.el, tc-help.el, tc-bushu.el, tc-mazegaki.el, tc-util.el, tc-tbl.el, tutc-tbl.el, eelll.el, tc-is19.el

   をコンパイルする．
7. M-x cd ~/tcodeに行く． mk-mzdicを開く．M-x eval-bufferを実行する．
8. ~/.emacs に (require 'tc-setup) を追加する．site-lispはload-pathに入っているはずだから，いじらなくていい．

個人的な設定

• T-codeのモードのオンとオフをKanzen流にする．モードはもともとよくないけど， トグルは絶対いけません．

  (defun my-tcode-mode-on ()
    (interactive)
    (fep-force-off t)
    (activate-input-method "japanese-T-Code") )
  
  (defun my-tcode-mode-off ()
    (interactive)
    (inactivate-input-method) )
  
  (global-set-key "\C-C" 'my-tcode-mode-off)
  (global-set-key "\C-J" 'my-tcode-mode-on)
  

• カーソルが点滅しないようにする．
  (blink-cursor-mode 0)
• 色がつかないようにする．以下のようにコメントアウトする．
  ; (global-font-lock-mode t)
  nilにしてもだめ．たぶん，font-lock.elをロードしてその中でtにしちゃうから．

• auto-helpを消す (このやり方がいいのか知らないけど)
  

  (add-hook 'tcode-ready-hook
  	  '(lambda ()
  	     (tcode-set-key-layout "qwerty")
  	     (setq tcode-auto-help nil) ))
  
  (add-hook 'tcode-mode-hook
  	  '(lambda ()
  	     (setq tcode-auto-help nil) ))
  
  (add-hook 'tcode-toggle-hook
  	  '(lambda ()
  	     (setq tcode-auto-help nil) ))
  
  

• 句読点を変える (同じく)
  

  (defvar tcode-kuten "．" "* 句点")
  (defvar tcode-touten "，" "* 読点")