;; 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.6 1996/11/09 02:17:24 kon Exp $ (setq romkana-table "default.cbp") (use-dictionary "iroha" "fuzokugo" "hojomwd" "hojoswd" "keishiki" :bushu "bushu" :user "user" ) ;; 一覧表示状態から、文字伸縮を行う。 (set-key 'ichiran-mode "\C-o" '(quit extend)) (set-key 'ichiran-mode "\C-i" '(quit shrink)) ;; シンボルの定義 (defsymbol ?[ "「" "『" "[" "[" "〔" ?] "」" "』" "]" "]" "〕" ) (defsymbol ?. "。" "." "." ?, "、" "," "," )