77 lines
3.2 KiB
Plaintext
77 lines
3.2 KiB
Plaintext
|
;; 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: 1.2.canna,v 1.6 1996/10/25 05:22:50 kon Exp $
|
|||
|
|
|
|||
|
|
;; default binding for romaji-kana translation table and dictionaries.
|
|||
|
|
|
|||
|
|
(setq romkana-table "default.cbp")
|
|||
|
|
|
|||
|
|
(use-dictionary
|
|||
|
|
"iroha"
|
|||
|
|
"fuzokugo"
|
|||
|
|
"hojomwd"
|
|||
|
|
"hojoswd"
|
|||
|
|
:bushu "bushu"
|
|||
|
|
:user "user"
|
|||
|
|
)
|
|||
|
|
|
|||
|
|
;; setting for compatibility with Canna version 1.2
|
|||
|
|
|
|||
|
|
(let ((mode 'yomi-mode))
|
|||
|
|
(set-key mode "\C-i" 'base-rotate-forward)
|
|||
|
|
(set-key mode "\C-o" 'base-rotate-backward)
|
|||
|
|
)
|
|||
|
|
|
|||
|
|
(set-mode-display 'alpha-mode "")
|
|||
|
|
(set-mode-display 'empty-mode " [<5B><>]")
|
|||
|
|
(set-mode-display 'hex-mode " [16<31><36>]")
|
|||
|
|
(set-mode-display 'bushu-mode " [<5B><><EFBFBD><EFBFBD>]")
|
|||
|
|
(set-mode-display 'henkan-nyuuryoku-mode " [<5B><>]")
|
|||
|
|
(set-mode-display 'zen-hira-kakutei-mode "<22><>[<5B><>]")
|
|||
|
|
(set-mode-display 'zen-kata-kakutei-mode "<22><>[<5B><>]")
|
|||
|
|
(set-mode-display 'han-kata-kakutei-mode "<22><>[<5B><>]")
|
|||
|
|
(set-mode-display 'zen-alpha-kakutei-mode "<22><>[<5B><>]")
|
|||
|
|
(set-mode-display 'han-alpha-kakutei-mode "<22><>[a]")
|
|||
|
|
(set-mode-display 'kigou-mode " [<5B><><EFBFBD><EFBFBD>]")
|
|||
|
|
|
|||
|
|
(set-mode-display 'yes-no-mode " [<5B><><EFBFBD><EFBFBD>]")
|
|||
|
|
(set-mode-display 'extend-mode " [<5B><>ĥ]")
|
|||
|
|
(set-mode-display 'russian-mode " [<5B><>]")
|
|||
|
|
(set-mode-display 'greek-mode " [<5B><>]")
|
|||
|
|
(set-mode-display 'line-mode " [<5B><><EFBFBD><EFBFBD>]")
|
|||
|
|
(set-mode-display 'changing-server-mode " [<5B>ѹ<EFBFBD>]")
|
|||
|
|
(set-mode-display 'henkan-method-mode " [<5B>Ѵ<EFBFBD>]")
|
|||
|
|
(set-mode-display 'delete-dic-mode " [<5B><><EFBFBD><EFBFBD>]")
|
|||
|
|
(set-mode-display 'touroku-mode " [<5B><>Ͽ]")
|
|||
|
|
(set-mode-display 'touroku-hinshi-mode " [<5B>ʻ<EFBFBD>]")
|
|||
|
|
(set-mode-display 'touroku-dic-mode " [<5B><><EFBFBD><EFBFBD>]")
|
|||
|
|
(set-mode-display 'quoted-insert-mode " [<5B><>]")
|
|||
|
|
(set-mode-display 'bubun-muhenkan-mode " [<5B>Խ<EFBFBD>]")
|
|||
|
|
(set-mode-display 'zen-kata-henkan-mode " [<5B><>]")
|
|||
|
|
(set-mode-display 'han-kata-henkan-mode " [<5B><>]")
|
|||
|
|
(set-mode-display 'zen-alpha-henkan-mode " [<5B><>]")
|
|||
|
|
(set-mode-display 'han-alpha-henkan-mode " [a]")
|
|||
|
|
(set-mode-display 'mount-dic-mode " [<5B><><EFBFBD><EFBFBD>]")
|
|||
|
|
(set-mode-display 'mojishu-mode " [<5B><><EFBFBD><EFBFBD>]")
|
|||
|
|
(set-mode-display 'tankouho-mode " [<5B><><EFBFBD><EFBFBD>]")
|
|||
|
|
(set-mode-display 'ichiran-mode " [<5B><><EFBFBD><EFBFBD>]")
|