/home/mip/.canna
;; 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: unix.canna,v 1.4 1996/10/25 05:23:02 kon Exp $
;; �����֤������Ѵ�����Ѥ��뤫��
(setq use-symbolic-definition t)
;;; ���������Ѵ������
;
; ���������Ѵ��ơ��֥����ꤷ�ޤ������������Ѵ��ơ��֥��
; (1) �����ȥǥ��쥯�ȥ�
; (2) �ۡ���ǥ��쥯�ȥ�
; (3) /usr/lib/canna/dic
; �ν�˥���������ޤ���
;
;(setq romkana-table "unix.cbp")
(setq romkana-table "default.cbp")
;; ������Ѵ�
;(setq english-table "canna/english.cbp")
;;; ��Ѥ��뼭��
;
; ����ñ�˽��¤٤Ƥ���Τ�ñ����Ͽ��Ԥ�ʤ�����ǥ����ƥ༭��ʤɤ�
; ����������ޤ���
;
; ���˴ؤ��Ƥ� :bushu ���Ԥ����Ƶ��Ҥ��ޤ���
;
; ñ����Ͽ��������˴ؤ��Ƥ� :user ���Ԥ����Ƶ��Ҥ��ޤ���ñ����
; Ͽ�뼭��ϥƥ����ȷ�������Ǥʤ���Фʤ�ޤ���ñ����Ͽ��������
; ����� mkdic user ���ͤʥ��ޥ�ɤ��ǤĤ��ȤǤǴ�ñ�˺����뤳�Ȥ���
; ���ޤ���
;
(use-dictionary
"gcanna"
"gcannaf"
"chimei"
; "iroha"
"fuzokugo"
"hojomwd"
"hojoswd"
"software"
"keishiki"
"zipcode"
"geo"
; "zip99"
"basho"
"keisan"
"pub"
"scien"
"sup"
"bonobo"
:bushu "bushu"
:user "user"
)
;;; ���ޤ��ޤʥѥ������
;
; ����ͤ���ꤹ���ΤˤĤ��ƤϿ��ˤĤ��Ƥ� t �����ˤĤ��Ƥ� nil ���
; �ꤷ�ޤ���
; ���ֱ��DZ��˹Ԥ����Ȥ���Ⱥ�ü�ˤ����褦�ˤ��뤫
(setq cursor-wrap t) ; default t
; ���ɽ���ǿ���Ǥä��Ȥ��˥��������ư��α���(nil)������ޤǤ���
; ���ޤ���(t)
(setq select-direct t) ; default t
; ���ɽ���ǿ����뤫(t)��nil�λ��Ͽ��ɽ������ޤ���
(setq numerical-key-select t) ; default t
; ����ɽ������ʸ��ζ�ڤ�˶����뤫
(setq bunsetsu-kugiri nil) ; default nil
; ʸ���١����ΰ�ư�뤫(t)�� nil�λ��ϥ��������Ѵ���ñ�̤ǥ���
; �����ư���Ԥ��ޤ���
(setq character-based-move t) ; default t
; �������ɤ���Τ��С������뤫
(setq reverse-widely nil) ; default nil
; ���ٳؽ��뤫
(setq gakushu t) ; default t
; ����κǸ�ޤǤ��ä����ö���ɽ������뤫
(setq quit-if-end-of-ichiran nil); default nil
; ʸ��α�ü�DZ���ư�����Τ����ꤷ�Ƥ��ޤ���
(setq kakutei-if-end-of-bunsetsu nil) ; default nil
; ��������Ʊ��ʸ��ˤȤɤޤ뤫(t)��nil�λ��ϰ�������Ԥ��ȤҤȤ��
; ��ʸ��˰�ư���ޤ���
(setq stay-after-validate t) ; default t
; �ɤߤ������˥Хå����ڡ������ǤĤȥ����ޤǥХ�Х�ˤ��뤫
(setq break-into-roman t) ; default nil
; ������Ѵ������ǰ��ɽ����Ԥ���������������Ѵ����������Ǥ�
; ���ɽ���ˤϰܤ�ޤ����ξ��ˤ� C-w ����Ϥ��ư��ɽ������
; ��������
(setq n-henkan-for-ichiran 2) ; default 2
; ñ����Ͽ����ʸˡ��Ϣ�μ���뤫(t)��nil�λ���Ŭ����ʻ���դ��Ƥ�
; �ޤ��ޤ���
(setq gramatical-question t) ; default t
; ���䤬���Τβ����ܤ���ɽ�����뤫
(setq kouho-count t) ; default t
; �༡�Ѵ��뤫
(setq auto nil) ; default nil
; �༡�Ѵ����˲��Ĥ�ʸ��ޤǤ�̤������ݻ����뤫
(setq n-kouho-bunsetsu 16) ; default 16
; ���������Ѵ��ǥ������ʥ�����ΤƤ뤫
(setq abandon-illegal-phonogram nil) ; default nil
; ����λ��⼡����Ϥ�ǧ��뤫
(setq allow-next-input t) ; default t
; ��ʸ����٥�Υ��������Ѵ������ơ��֥�
(if use-symbolic-definition
(progn
(defsymbol ?- "��" "-" "��" "��")
(defsymbol ?/ "/" "��" "��")
(defsymbol ?\\ "\\" "��" "��")
(defsymbol
?( "(" "��" "��"
?) ")" "��" "��" )
(defsymbol
?[ "��" "��" "��" "��" "["
?] "��" "��" "��" "��" "]")
(defsymbol
?. "��" "��" "."
?, "��" "��" "," )
(defsymbol
?0 "0" "��" "��" "��"
?1 "1" "��" "��" "��"
?2 "2" "��" "��" "�"
?3 "3" "��" "��" "��"
?4 "4" "��" "��" "��"
?5 "5" "��" "��" "��"
?6 "6" "��" "ϻ" "ϻ"
?7 "7" "��" "��" "��"
?8 "8" "��" "Ȭ" "Ȭ"
?9 "9" "��" "��" "��" )
(defsymbol
?? "?" "��"
?! "!" "��")
(defsymbol ?# "#" "��")
(defsymbol ?$ "$" "��")
(defsymbol ?% "%" "��")
(defsymbol ?& "&" "��")
(defsymbol ?+ "+" "��")
(defsymbol ?* "*" "��" "��")
(defsymbol ?_ "_" "��")
(defsymbol ?' "'" "��")
(defsymbol ?` "`" "��")
(defsymbol ?\" "\"" "��")
))
;; delete ������Хå����ڡ�����Ʊ���������
(global-set-key "\Delete" 'delete-previous) ; necessary in using Emacs
;; Help ���ʤ��ͤ⤤��Τ� F1 �Ǥ�Ʊ��ư����롣
(global-set-key "\F1" 'extend-mode)
;; Escape key should escape from the mode.
(global-set-key "\Escape" 'quit)
;; Ctrl-o �����
(global-unbind-key-function 'japanese-mode)