;; Copyright 1992 NEC Corporation, Tokyo, Japan. ;; ;; Permission to use, copy, modify, distribute and sell this software ;; and its documentation for any purpose is hereby granted without ;; fee, provided that the above copyright notice appear in all copies ;; and that both that copyright notice and this permission notice ;; appear in supporting documentation, and that the name of NEC ;; Corporation not be used in advertising or publicity pertaining to ;; distribution of the software without specific, written prior ;; permission. NEC Corporation makes no representations about the ;; suitability of this software for any purpose. It is provided "as ;; is" without express or implied warranty. ;; ;; NEC CORPORATION DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, ;; INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN ;; NO EVENT SHALL NEC CORPORATION BE LIABLE FOR ANY SPECIAL, INDIRECT OR ;; CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF ;; USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR ;; OTHER TORTUOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR ;; PERFORMANCE OF THIS SOFTWARE. ;; $Id: default.ca,v 1.3 1992/07/28 13:14:10 kon Exp $ (setq romkana-table "default.cbp") ;(setq romkana-table "kana.cbp") (use-dictionary "iroha" "fuzokugo" "hojomwd" "hojoswd" "keishiki" "skkedict" "skkgeo" "skkname" "skkjis2" "skkl" "skklaw" "skkoki" "skkozip" "skkzip" :bushu "bushu" :user "user" ) ;; 拡張モード表示 (global-set-key "\C-v" 'extend-mode) ;; BackSpaceで削除できるようにする。 (let ((mode 'yomi-mode)) (set-key mode "\C-h" 'delete-previous) (set-key mode "\Delete" 'delete-previous) ) ;; 変換開始終了キー設定 ;(global-unbind-key-function 'japanese-mode) ;(global-set-key "\C-o" 'japanese-mode) ;(global-unbind-key-function 'alpha-mode) ;(global-set-key "\C-o" 'alpha-mode)