File: default.ca

package info (click to toggle)
canna 3.5b2-14
  • links: PTS
  • area: main
  • in suites: hamm
  • size: 7,116 kB
  • ctags: 25,066
  • sloc: ansic: 79,093; makefile: 23,873; yacc: 403; lex: 379; cpp: 369; sh: 87; awk: 7
file content (49 lines) | stat: -rw-r--r-- 1,657 bytes parent folder | download | duplicates (4)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
;; 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 
  ?. "" "." ""
  ?, "" "," "" )