annotate lisp/skk/skk-vars.el @ 225:12579d965149 r20-4b11

Import from CVS: tag r20-4b11
author cvs
date Mon, 13 Aug 2007 10:11:40 +0200
parents 262b8bb4a523
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
219
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1 (require 'skk-foreword)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
2
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
3 ;;;### (autoloads (skk-make-face skk-change-cursor-when-ovwrt skk-set-cursor-properly skk-middle-list skk-jisx0208-to-ascii skk-update-jisyo skk-nunion skk-search skk-save-jisyo skk-start-henkan skk-kakutei skk-previous-candidate skk-get-current-candidate skk-emulate-original-map skk-auto-fill-mode skk-mode skk-set-marker skk-y-or-n-p skk-yes-or-no-p skk-error skk-message skk-save-point skk-version) "skk" "skk/skk.el")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
4
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
5 (defconst skk-month-alist '(("Jan" . "1") ("Feb" . "2") ("Mar" . "3") ("Apr" . "4") ("May" . "5") ("Jun" . "6") ("Jul" . "7") ("Aug" . "8") ("Sep" . "9") ("Oct" . "10") ("Nov" . "11") ("Dec" . "12")) "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
6 $B1Q8l$N7nL>$H;;MQ?t;z$NO"A[%j%9%H!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
7
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
8 $B;;MQ?t;z$+$i1Q8l$N7nL>$N$_$r=PNO$9$k$N$G$"$l$P!"%Y%/%?!<$r;H$C$?J}$,9bB.$@$,!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
9 $B1Q8l$N7nL>$+$i;;MQ?t;z$r=PNO$9$k$N$G$"$l$PO"A[%j%9%H$G$J$1$l$PL5M}$J$N$G!"B?(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
10 $BL\E*$K;HMQ$G$-$k$h$&O"A[%j%9%H$N7ABV$r<h$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
11
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
12 Alist of English month abbreviations and numerical values.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
13
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
14 Although it is faster to use a vector if we only want to output
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
15 month abbreviations given the ordinal, without the alist it's
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
16 unreasonable [sic] to output the ordinal given the abbreviation,
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
17 so for multi-purpose utility we use the alist form.")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
18
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
19 (autoload 'skk-version "skk" nil t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
20
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
21 (defvar skk-init-file (if (eq system-type 'ms-dos) "~/_skk" "~/.skk") "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
22 *SKK $B$N=i4|@_Dj%U%!%$%kL>!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
23 skk.el 9.x $B$h$j(B ~/.emacs $B$G$N%+%9%?%^%$%:$,2DG=$H$J$C$?!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
24
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
25 Name of the SKK initialization file.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
26 From skk.el 9.x on all customization may be done in ~/.emacs.")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
27
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
28 (defvar skk-special-midashi-char-list '(?\> ?\< ?\?) "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
29 *$B@\F,<-!"@\Hx<-$NF~NO$N$?$a$N%W%l%U%#%C%/%9%-!<!"%5%U%#%C%/%9%-!<$N%j%9%H!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
30
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
31 List of prefix and suffix keys for entering `setsutoji' and `setsuoji'.")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
32
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
33 (defvar skk-mode-hook nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
34 *SKK $B$r5/F0$7$?$H$-$N%U%C%/!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
35 $BB>$K!"(Bskk-auto-fill-mode-hook$B!"(Bskk-load-hook, skk-init-file $B$G$b%+%9%?(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
36 $B%^%$%:$,2DG=!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
37
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
38 Hook run at SKK startup.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
39
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
40 `skk-auto-fill-mode-hook', `skk-load-hook', and skk-init-file may also
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
41 be used for customization.")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
42
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
43 (defvar skk-auto-fill-mode-hook nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
44 *skk-auto-fill-mode $B$r5/F0$7$?$H$-$N%U%C%/!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
45 $BB>$K!"(Bskk-mode-hook, skk-load-hook, skk-init-file $B$G$b%+%9%?%^%$%:$,2D(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
46 $BG=!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
47
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
48 Hook run at startup of skk-auto-fill-mode.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
49
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
50 `skk-mode-hook', `skk-load-hook', and `skk-init-file' may also be
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
51 used for customization.")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
52
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
53 (defvar skk-load-hook nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
54 *skk.el $B$r%m!<%I$7$?$H$-$N%U%C%/!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
55 $BB>$K!"(Bskk-mode-hook, skk-auto-fill-mode-hook, skk-init-file $B$G$b%+%9%?(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
56 $B%^%$%:$,2DG=!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
57
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
58 Hook run when SKK is loaded.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
59
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
60 `skk-auto-fill-mode-hook', `skk-mode-hook', and `skk-init-file' may
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
61 also be used for customization.")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
62
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
63 (defvar skk-kakutei-jisyo nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
64 *$B:G=i$K8!:w$9$k<-=q!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
65 Non-nil $B$G!"$+$D(B skk-search-prog-list $B$NMWAG$NCf$K$3$NJQ?t$,;HMQ$5$l$F$$$l$P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
66 $B;XDj$5$l$?<-=q$r8!:w$N$?$a%P%C%U%!$KFI$_9~$_!"8!:w$r9T$J$&!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
67 $B8+=P$78l$O!"%=!<%H$5$l$F$$$J$1$l$P$J$i$J$$!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
68 $B3F8+=P$78l$N:G=i$N%(%s%H%j$7$+8!:w$7$J$$(B ($BJ#?t$N%(%s%H%j$,$"$C$F$b(B 2 $BHVL\0J9_$N(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
69 $B%(%s%H%j$OL5;k$5$l$k(B)$B!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
70 skk-search-prog-list $B$NCM$r@_Dj$9$k$3$H$K$h$j!"8!:wBP>]$N<-=q$NJQ99!"8!:w$N=g(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
71 $B=x$NJQ99$,2DG=!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
72
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
73 The first dictionary to be searched.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
74 If non-nil, and this variable is used as a component of
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
75 `skk-search-prog-list', the indicated dictionary is read into a
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
76 buffer and searched.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
77 The keys must be sorted.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
78 Only the first entry in each key is checked; if several entries are
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
79 present the second and following entries are ignored.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
80 By setting the value of `skk-search-prog-list' the dictionaries
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
81 searched and the order of search can be changed.")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
82
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
83 (defvar skk-initial-search-jisyo nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
84 *$B%f!<%6!<<-=q$N8!:w$NA0$K8!:w$9$k<-=q!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
85 $B8+=P$78l$O!"%=!<%H$5$l$F$$$J$1$l$P$J$i$J$$!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
86 Non-nil $B$G!"$+$D(B skk-search-prog-list $B$NMWAG$NCf$K$3$NJQ?t$,;HMQ$5$l$F$$$l$P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
87 $B;XDj$5$l$?<-=q$r8!:w$N$?$a%P%C%U%!$KFI$_9~$_!"8!:w$r9T$J$&!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
88 skk-search-prog-list $B$NCM$r@_Dj$9$k$3$H$K$h$j!"8!:wBP>]$N<-=q$NJQ99!"8!:w$N=g(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
89 $B=x$NJQ99$,2DG=!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
90
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
91 This dictionary is searched before the user's personal dictionary.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
92 The keys must be sorted.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
93 If non-nil, and this variable is used as a component of
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
94 `skk-search-prog-list', the indicated dictionary is read into a
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
95 buffer and searched.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
96 By setting the value of `skk-search-prog-list' the dictionaries
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
97 searched and the order of search can be changed.")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
98
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
99 (defvar skk-large-jisyo nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
100 *$B%f!<%6!<<-=q$N8!:w$N8e$K8!:w$9$k<-=q!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
101 $B8+=P$78l$O!"%=!<%H$5$l$F$$$J$1$l$P$J$i$J$$!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
102 Non-nil $B$G!"$+$D(B skk-search-prog-list $B$NMWAG$NCf$K$3$NJQ?t$,;HMQ$5$l$F$$$l$P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
103 $B;XDj$5$l$?<-=q$r8!:w$N$?$a%P%C%U%!$KFI$_9~$_!"8!:w$r9T$J$&!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
104 skk-search-prog-list $B$NCM$r@_Dj$9$k$3$H$K$h$j!"8!:wBP>]$N<-=q$NJQ99!"8!:w$N=g(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
105 $B=x$NJQ99$,2DG=!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
106
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
107 Dictionary searched after the user dictionary.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
108 Keys must be sorted.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
109 If non-nil and this variable is used as a component of
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
110 `skk-search-prog-list', the indicated dictionary is read into a buffer
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
111 for search, and the search is executed.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
112 By setting the value of `skk-search-prog-list' the dictionaries
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
113 searched and the order of search can be changed.")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
114
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
115 (defvar skk-aux-large-jisyo nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
116 *SKK $B%5!<%P!<$G:G8e$K8!:w$9$k<-=q!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
117 $B8+=P$78l$O!"%=!<%H$5$l$F$$$J$1$l$P$J$i$J$$!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
118 Non-nil $B$G!"$+$D(B skk-search-prog-list $B$NMWAG$NCf$K$3$NJQ?t$,;HMQ$5$l$F$$$l$P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
119 SKK $B%5!<%P!<$r;H$$8!:w$r9T$&!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
120 SKK $B%5!<%P!<$,(B active $B$G$J$1$l$P!";XDj$5$l$?<-=q$r%P%C%U%!$KFI$_9~$`!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
121 skk-search-prog-list $B$NCM$r@_Dj$9$k$3$H$K$h$j!"8!:wBP>]$N<-=q$NJQ99!"8!:w$N=g(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
122 $B=x$NJQ99$,2DG=!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
123 $B$3$NCM$r@_Dj$9$k$3$H$K$h$j!"(Bskk-server.el $B$,(B autoload $B$5$l$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
124
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
125 Last dictionary to be searched by the SKK server.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
126 Keys must be sorted.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
127
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
128 If non-nil and this variable is used as a component of
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
129 `skk-search-prog-list', the SKK server is used to execute the search.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
130 If the server is not active, the indicated dictionary is read into a
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
131 buffer for search, and the search is executed.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
132 By setting the value of `skk-search-prog-list' the dictionaries
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
133 searched and the order of search can be changed.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
134 According to the value of this variable the skkserv.el will be
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
135 autoloaded.")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
136
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
137 (defvar skk-search-prog-list '((skk-search-kakutei-jisyo-file skk-kakutei-jisyo 10000 t) (skk-search-jisyo-file skk-initial-search-jisyo 10000 t) (skk-search-jisyo-file skk-jisyo 0 t) (skk-search-jisyo-file skk-large-jisyo 10000)) "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
138 *$B8!:w4X?t!"8!:wBP>]$N<-=q$r7hDj$9$k$?$a$N%j%9%H!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
139 $BJQ49$7$?8uJd$rJV$9(B S $B<0$r%j%9%H$N7A$KI=5-$7$?$b$N!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
140 skk-search $B4X?t$,(B skk-search-prog-list $B$N(B car $B$+$i8eJ}8~$X=gHV$K(B S $B<0$NI>2A$r(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
141 $B9T$$JQ49$r9T$J$&!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
142
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
143 This list determines the search functions used and the dictionaries
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
144 searched.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
145 A list of S-expressions returning conversion candidates.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
146 The function `skk-search' performs conversions by evaluating each S-
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
147 expression in order, starting with the car of `skk-search-prog-list'.")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
148
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
149 (defvar skk-jisyo (if (eq system-type 'ms-dos) "~/_skk-jisyo" "~/.skk-jisyo") "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
150 *SKK $B$N%f!<%6!<<-=q!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
151
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
152 SKK's dictionary of user-specified conversions.")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
153
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
154 (defvar skk-backup-jisyo (if (eq system-type 'ms-dos) "~/_skk-jisyo.BAK" "~/.skk-jisyo.BAK") "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
155 *SKK $B$N%f!<%6!<<-=q$N%P%C%/%"%C%W%U%!%$%k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
156
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
157 Name of user dictionary backup (a file name as a string).")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
158
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
159 (defvar skk-jisyo-code nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
160 *Non-nil $B$G$"$l$P!"$=$NCM$G<-=q%P%C%U%!$N4A;z%3!<%I$r@_Dj$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
161 Mule $B$G$O!"(B*euc-japan*, *sjis*, *junet*$B!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
162 $B$^$?!"(B\"euc\", \"ujis\", \"sjis\", \"jis\" $B$J$I$NJ8;zNs$K$h$C$F$b;XDj$,(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
163 $B2DG=!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
164
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
165 If non-nil, the value sets the kanji code used in dictionary buffers.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
166 In Mule, the symbols *euc-japan*, *sjis*, or *junet*. Can also be
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
167 specified as a string such as \"euc\", \"ujis\", \"sjis\", or \"jis\".")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
168
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
169 (defvar skk-keep-record t "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
170 *Non-nil $B$G$"$l$P!"JQ49$K4X$9$k5-O?$r(B skk-record-file $B$K<h$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
171
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
172 If non-nil, a record of conversions is kept in `skk-record-file'.")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
173
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
174 (defvar skk-record-file (if (eq system-type 'ms-dos) "~/_skk-record" "~/.skk-record") "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
175 *$B%f!<%6!<<-=q$NE}7W$r<h$k%U%!%$%k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
176 $B<-=q%;!<%V$N;~9o!"C18l$NEPO??t!"3NDj$r9T$C$?2s?t!"3NDjN(!"A4BN$N8l?t$N(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
177 $B>pJs$r<}$a$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
178
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
179 File containing statistics about the user dictionary.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
180
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
181 At the time the dictionary is saved, the number of words registered,
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
182 number of conversions accepted, rate of acceptance, and the total
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
183 number of words are collected.")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
184
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
185 (defvar skk-kakutei-key "\n" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
186 *$B3NDjF0:n(B (\"skk-kakutei\") $B$r9T$&%-!<!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
187
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
188 The key that executes conversion confirmation (\"skk-kakutei\").")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
189
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
190 (defvar skk-use-vip nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
191 *Non-nil $B$G$"$l$P!"(BVIP $B$KBP1~$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
192
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
193 If non-nil, VIP compatibility mode.")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
194
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
195 (defvar skk-use-viper nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
196 *Non-nil $B$G$"$l$P!"(BVIPER $B$KBP1~$9$k!#!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
197
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
198 If non-nil, VIPER compatibility mode.")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
199
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
200 (defvar skk-henkan-okuri-strictly nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
201 *Non-nil $B$G$"$l$P!"8+=P$78l$HAw$j2>L>$,0lCW$7$?$H$-$@$18uJd$H$7$F=PNO$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
202 $BNc$($P!"2<5-$N$h$&$J<-=q%(%s%H%j$,!"(Bskk-jisyo ($B%W%i%$%Y!<%H<-=q(B) $B$K$"$C$?>l9g$K(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
203
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
204 \"$B$*$*(Bk /$BBg(B/$BB?(B/[$B$/(B/$BB?(B/]/[$B$-(B/$BBg(B/]/\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
205
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
206 \"$B"&$*$*(B*$B$/(B\" $B$rJQ49$7$?$H$-!"(B\"$BB?$/(B\" $B$N$_$r=PNO$7!"(B\"$BBg$/(B\" $B$r=PNO$7$J$$!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
207
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
208 SKK-JISYO.[SML] $B$NAw$j2>L>%(%s%H%j$O>e5-$N7A<0$K$J$C$F$$$J$$$N$G!"(Bskk-jisyo $B$N(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
209 $BAw$j$"$j$N<-=q%(%s%H%j$,$3$N7A<0$N$b$N$r$"$^$j4^$s$G$$$J$$>l9g$O!"$3$N%*%W%7%g(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
210 $B%s$r(B on $B$K$9$k$3$H$G!"$9$0$KC18lEPO?$KF~$C$F$7$^$&$N$GCm0U$9$k$3$H!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
211
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
212 skk-process-okuri-early $B$NCM$,(B nil $B$J$i$P>e5-$N7A<0$G(B skk-jisyo $B$,:n$i$l$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
213
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
214 Emacs 19 $B%Y!<%9$N(B Mule $B$J$i$P!"2<5-$N%U%)!<%`$rI>2A$9$k$3$H$G!"C18lEPO?$KF~$C(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
215 $B$?$H$-$@$10l;~E*$K$3$N%*%W%7%g%s$r(B nil $B$K$9$k$3$H$,$G$-$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
216
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
217 (add-hook 'minibuffer-setup-hook
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
218 (function
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
219 (lambda ()
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
220 (if (and (boundp 'skk-henkan-okuri-strictly)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
221 skk-henkan-okuri-strictly
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
222 (not (eq last-command 'skk-purge-from-jisyo)) )
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
223 (progn
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
224 (setq skk-henkan-okuri-strictly nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
225 (put 'skk-henkan-okuri-strictly 'temporary-nil t) )))))
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
226
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
227 (add-hook 'minibuffer-exit-hook
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
228 (function
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
229 (lambda ()
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
230 (if (get 'skk-henkan-okuri-strictly 'temporary-nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
231 (progn
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
232 (put 'skk-henkan-okuri-strictly 'temporary-nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
233 (setq skk-henkan-okuri-strictly t) )))))
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
234
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
235 $B$3$N%*%W%7%g%sMxMQ;~$O!"(Bskk-process-okuri-early $B$NCM$O(B nil $B$G$J$1$l$P$J$i$J$$(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
236 \($B%a%K%e!<%P!<(B $B$rMxMQ$7$F%+%9%?%^%$%:$7$?>l9g$O<+F0E*$KD4@0$5$l$k(B)$B!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
237
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
238 If non-nil, only when the key and its inflected suffix are given
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
239 together in the dictionary will they be output as a candidate. For
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
240 example, if the following entry is in `skk-jisyo' (the provate
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
241 dictionary),
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
242
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
243 \"$B$*$*(Bk /$BBg(B/$BB?(B/[$B$/(B/$BB?(B/]/[$B$-(B/$BBg(B/]/\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
244
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
245 then when converting \"$B"&$*$*(B*$B$/(B\", only \"$BB?$/(B\" wil be output; \"$BBg$/(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
246 \" will not be offered as a candidate.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
247
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
248 The inflected suffixes in SKK-JISYO.[SML] are not given in the above
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
249 way, so if very few of the entries in skk-jisyo are given in that
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
250 form, then when this option is set `on', \"word registration mode\" will
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
251 be entered extremely often.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
252
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
253 If the value of `skk-process-okuri-early' is `nil', new entries in
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
254 `skk-jisyo' will be created in the form above.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
255
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
256 If using a Mule based on Emacs 19 or later, you can arrange for this
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
257 option to be temporarily set to `nil' by evaluating the following
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
258 form:
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
259
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
260 (add-hook 'minibuffer-setup-hook
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
261 (function
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
262 (lambda ()
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
263 (if (and (boundp 'skk-henkan-okuri-strictly)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
264 skk-henkan-okuri-strictly
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
265 (not (eq last-command 'skk-purge-from-jisyo)) )
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
266 (progn
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
267 (setq skk-henkan-okuri-strictly nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
268 (put 'skk-henkan-okuri-strictly 'temporary-nil t) )))))
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
269
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
270 (add-hook 'minibuffer-exit-hook
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
271 (function
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
272 (lambda ()
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
273 (if (get 'skk-henkan-okuri-strictly 'temporary-nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
274 (progn
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
275 (put 'skk-henkan-okuri-strictly 'temporary-nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
276 (setq skk-henkan-okuri-strictly t) )))))
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
277
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
278 When using this option, `skk-process-okuri-early' must be `nil'.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
279 \(When using customize from the menubar this will automatically
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
280 temporarily be set to `nil'.)")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
281
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
282 (defvar skk-henkan-strict-okuri-precedence nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
283 *Non-nil $B$G$"$l$P!"8+=P$78l$HAw$j2>L>$,0lCW$7$?8uJd$rM%@h$7$FI=<($9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
284 $BNc$($P!"2<5-$N$h$&$J<-=q%(%s%H%j$,!"(Bskk-jisyo ($B%W%i%$%Y!<%H<-=q(B) $B$K$"$C$?>l9g$K(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
285
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
286 \"$B$*$*(Bk /$BBg(B/$BB?(B/[$B$/(B/$BB?(B/]/[$B$-(B/$BBg(B/]/\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
287
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
288 \"$B"&$*$*(B*$B$/(B\" $B$rJQ49$7$?$H$-!"$^$:(B\"$BB?$/(B\" $B$r=PNO$7!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
289 $B<!$K(B \"$BBg$/(B\" $B$r=PNO$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
290
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
291 \"$BBg$/(B\"$B$J$I$N8uJd$O$&$C$H$&$7$$$,!"$9$0$KC18lEPO?$K$O$$$C$F$7$^$&$N$b(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
292 $B7y$J$R$H$K$*$9$9$a!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
293
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
294 $B$3$N%*%W%7%g%sMxMQ;~$O!"(Bskk-process-okuri-early $B$NCM$O(B nil $B$G$J$i$J$$!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
295 $B$^$?(B skk-henkan-okuri-strictly $B$,(B non-nil $B$N$H$-$O!"$3$NJQ?t$OL5;k$5$l$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
296 \($B%a%K%e!<%P!<(B $B$rMxMQ$7$F%+%9%?%^%$%:$7$?>l9g$O<+F0E*$KD4@0$5$l$k(B)$B!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
297
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
298 (defvar skk-auto-okuri-process nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
299 *Non-nil $B$G$"$l$P!"Aw$j2>L>ItJ,$r<+F0G'<1$7$FJQ49$r9T$&!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
300 $BNc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
301
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
302 \"Uresii (\"UreSii\" $B$G$O$J$/(B) -> $B4r$7$$(B\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
303
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
304 $B$N$h$&$KJQ49$5$l$k!#C"$7!"(Bskk-jisyo $B<-=q(B ($B%W%i%$%Y!<%H<-=q(B) $B$,!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
305
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
306 \"$B$&$l(Bs /$B4r(B/[$B$7(B/$B4r(B/]/\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
307
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
308 $B$N$h$&$J7A<0$K$J$C$F$$$k$3$H$,I,MW$G$"$k(B (SKK-JISYO.[SML] $B$O$3$N7A<0$KBP1~$7(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
309 $B$F$$$J$$$N$G!"(Bskk-jisyo $B$K$3$N%(%s%H%j$,$J$1$l$P$J$i$J$$(B)$B!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
310
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
311 $B$3$N%*%W%7%g%sMxMQ;~$O!"(Bskk-process-okuri-early $B$NCM$O(B nil $B$G$J$1$l$P$J$i$J$$(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
312 \($B%a%K%e!<%P!<(B $B$rMxMQ$7$F%+%9%?%^%$%:$7$?>l9g$O<+F0E*$KD4@0$5$l$k(B)$B!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
313
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
314 (defvar skk-process-okuri-early nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
315 *Non-nil $B$G$"$l$P!"Aw$j2>L>$N%m!<%^;z%W%l%U%#%C%/%9$NF~NO;~E@$GJQ49$r3+;O$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
316 $BNc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
317
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
318 \"UgoK -> $B"'F0(Bk\"$B!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
319
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
320 $BAw$j2>L>$,J,$i$J$$$^$^JQ49$7$F$$$k$3$H$K$J$k$N$G!"(Bskk-jisyo $B$,Aw$j2>L>$KBP1~$7(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
321 $B$?7A$K@.D9$7$J$$!#$D$^$j(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
322
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
323 \"$B$&$4(Bk /$BF0(B/\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
324
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
325 $B$N$h$&$J7ABV$N$^$^$H$J$k!#$?$@$7!"4{$K(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
326
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
327 \"$B$&$4(Bk /$BF0(B/[$B$/(B/$BF0(B/]/[$B$+(B/$BF0(B/]/[$B$1(B/$BF0(B/]/[$B$-(B/$BF0(B/]/[$B$3(B/$BF0(B/]/\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
328
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
329 $B$N$h$&$J%(%s%H%j$,(B skk-jisyo $B$K$"$l$P!"$=$l$rGK2u$7$J$$!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
330
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
331 nil $B$G$"$l$P!"Aw$j2>L>$NF~NO$,40N;$7$?;~E@$GJQ49$,3+;O$9$k!#Nc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
332
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
333 \"UgoK -> $B"&$&$4(B*k\", \"UgoKu -> $B"'F0$/(B\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
334
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
335 $B$3$N%*%W%7%g%s$r(B on $B$K$7$F(B skk-mode $B$r5/F0$9$k$H!"N>N)$G$-$J$$%*%W%7%g%s$G$"$k(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
336 skk-kakutei-early, skk-auto-okuri-process, skk-henkan-okuri-strictly $B$O(B nil $B$K(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
337 $B%;%C%H$5$l$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
338
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
339 (defvar skk-egg-like-newline nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
340 *Non-nil $B$G$"$l$P!""'%b!<%I$G2~9T$r%?%$%W$7$F$b3NDj$9$k$N$_$G2~9T$7$J$$!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
341
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
342 (defvar skk-kakutei-early t "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
343 *Non-nil $B$G$"$l$P(B skk-kana-input $B$,8F$P$l$?$H$-$K8=:_$N8uJd$r3NDj$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
344 $BNc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
345
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
346 \"$B"&$+$/$F$$(B -> $B"'3NDj(B -> $B3NDj(Bs -> $B3NDj$9(B\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
347
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
348 $B$N$h$&$KJQ498e!"!V$9!W$N(B prefix $B$G$"$k(B \"s\" $B$rF~NO$7$?;~E@$G3NDj$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
349 nil $B$G$"$l$P!"Nc$($P(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
350
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
351 \"$B"&$+$/$F$$(B -> $B"'3NDj(B -> $B"'3NDj(Bs -> $B"'3NDj$9$k(B -> $B3NDj$9$k!#(B\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
352
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
353 $B$N$h$&$K(B skk-kakutei $B$rD>@\!"4V@\$K%3!<%k$9$k$^$G(B ($B6gFIE@$rF~NO$7$?$j!"?7$?$J(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
354 $B"&%b!<%I$KF~$C$?$j$9$k$H4V@\E*$K(B skk-kakutei $B$r%3!<%k$9$k(B) $B$O!"3NDj$7$J$$$N$G!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
355 $B$=$N4V$O!"JQ498uJd$rA*$S$J$*$9$3$H$J$I$,2DG=!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
356
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
357 $B$3$N%*%W%7%g%sMxMQ;~$O!"(Bskk-process-okuri-early $B$NCM$O(B nil $B$G$J$1$l$P$J$i$J$$(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
358 \($B%a%K%e!<%P!<(B $B$rMxMQ$7$F%+%9%?%^%$%:$7$?>l9g$O<+F0E*$KD4@0$5$l$k(B)$B!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
359
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
360 (defvar skk-delete-implies-kakutei t "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
361 *Non-nil $B$G$"$l$P!""'%b!<%I$G(B BS $B$r2!$9$H!"A0$N0lJ8;z$r:o=|$73NDj$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
362 nil $B$G$"$l$P!"0l$DA0$N8uJd$rI=<($9$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
363
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
364 (defvar skk-allow-spaces-newlines-and-tabs t "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
365 *Non-nil $B$G$"$l$P!"(Bskk-henkan-key $B$K%9%Z!<%9!"%?%V!"2~9T$,$"$C$F$bJQ492DG=!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
366 $BNc$($P!"2<5-$N$h$&$K(B skk-henkan-key $B$NCf$K2~9T$,F~$C$F$$$F$bJQ49$,2DG=$G$"$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
367
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
368 \"$B"&$+(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
369 $B$J(B\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
370 -> \"$B2>L>(B\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
371
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
372 $B$3$NCM$,(B nil $B$G$"$l$P!":G=i$N%9%Z!<%9$G(B skk-henkan-key $B$r@Z$j5M$a$F$7$^$$!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
373 $B0J9_$N%9%Z!<%9!"%?%V!"2~9T$OL5;k$5$l$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
374 $B$3$NCM$O!"(Bskk-start-henkan, skk-ascii-henkan, skk-katakana-henkan,
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
375 skk-hiragana-henkan, skk-zenkaku-henkan $B5Z$S(B skk-backward-and-set-henkan-point
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
376 $B$NF0:n$K1F6A$9$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
377
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
378 (defvar skk-convert-okurigana-into-katakana nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
379 *Non-nil $B$G$"$l$P!"%+%?%+%J%b!<%I$GJQ49$7$?$H$-$KAw$j2>L>$b%+%?%+%J$KJQ49$9$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
380
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
381 (defvar skk-delete-okuri-when-quit nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
382 *Non-nil $B$G$"$l$P!"Aw$j$"$j$NJQ49Cf$K(B \"C-g\" $B$r2!$9$HAw$j2>L>$r>C$7"&%b!<%I$KF~$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
383 $BNc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
384
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
385 \"$B"&$J(B*$B$/(B -> $B"'5c$/(B -> \"C-g\" ->$B"&$J(B\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
386
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
387 nil $B$G$"$l$P!"Aw$j2>L>$r4^$a$?8+=P$78l$r$=$N$^$^;D$7!""#%b!<%I$KF~$k!#Nc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
388
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
389 \"$B"&$J(B*$B$/(B -> $B"'5c$/(B -> \"C-g\" -> $B$J$/(B\"")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
390
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
391 (defvar skk-henkan-show-candidates-keys '(?a ?s ?d ?f ?j ?k ?l) "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
392 *$B%a%K%e!<7A<0$G8uJd$rA*Br$9$k$H$-$NA*Br%-!<$N%j%9%H!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
393 \"x\", \" \" $B5Z$S(B \"C-g\" $B0J30$N(B 7 $B$D$N%-!<(B (char type) $B$r4^$`I,MW$,$"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
394 $B$k!#(B\"x\", \" \" $B5Z$S(B \"C-g\" $B$O8uJdA*Br;~$K$=$l$>$lFCJL$J;E;v$K3d$jEv(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
395 $B$F$i$l$F$$$k$N$G!"$3$N%j%9%H$NCf$K$O4^$a$J$$$3$H!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
396
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
397 (defvar skk-ascii-mode-string " SKK" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
398 *SKK $B$,(B ascii $B%b!<%I$G$"$k$H$-$K%b!<%I%i%$%s$KI=<($5$l$kJ8;zNs!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
399
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
400 (defvar skk-hirakana-mode-string " $B$+$J(B" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
401 *$B$R$i$,$J%b!<%I$G$"$k$H$-$K%b!<%I%i%$%s$KI=<($5$l$kJ8;zNs!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
402
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
403 (defvar skk-katakana-mode-string " $B%+%J(B" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
404 *$B%+%?%+%J%b!<%I$G$"$k$H$-$K%b!<%I%i%$%s$KI=<($5$l$kJ8;zNs!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
405
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
406 (defvar skk-zenkaku-mode-string " $BA41Q(B" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
407 *$BA41Q%b!<%I$G$"$k$H$-$K%b!<%I%i%$%s$KI=<($5$l$kJ8;zNs!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
408
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
409 (defvar skk-abbrev-mode-string " a$B$"(B" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
410 *SKK abbrev $B%b!<%I$G$"$k$H$-$K%b!<%I%i%$%s$KI=<($5$l$kJ8;zNs!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
411
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
412 (defvar skk-echo t "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
413 *Non-nil $B$G$"$l$P!"2>L>J8;z$N%W%l%U%#%C%/%9$rI=<($9$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
414
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
415 (defvar skk-use-numeric-conversion t "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
416 *Non-nil $B$G$"$l$P!"?tCMJQ49$r9T$&!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
417
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
418 (defvar skk-char-type-vector [0 0 0 0 0 0 0 0 5 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 4 4 4 4 4 4 4 4 4 4 4 0 4 4 4 4 0 4 4 4 4 4 4 0 4 4 0 0 0 0 0 0 3 1 1 1 3 1 1 1 3 1 1 0 1 2 3 1 0 1 1 1 3 1 1 2 1 1 0 0 0 0 5] "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
419 *skk-kana-input $B$G;2>H$9$k$+$JJ8;zJQ49$N$?$a$N(B char type $B%Y%/%?!<!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
420 $B3FMWAG$N?t;z$N0UL#$O2<5-$NDL$j!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
421
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
422 0 $B%m!<%^J8;z$h$j$+$JJ8;z$X$NJQ49$rCf;_$9$k(B ($B8=:_$N$H$3$m;HMQ$7$F$$$J$$(B)$B!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
423 1 $BB%2;$N0lItJ,$H$J$jF@$k;R2;!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
424 2 $B>e5-(B 1 $B0J30$N;R2;(B (n, x)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
425 3 $BJl2;(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
426 4 skk-mode $B$G!"(Bskk-set-henkan-point $B$K3d$jIU$1$i$l$F$$$kJ8;z!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
427 5 $B%W%l%U%#%C%/%9$r>C5n$9$k(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
428
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
429 (defvar skk-standard-rom-kana-rule-list '(("b" "b" nil) ("by" "by" nil) ("c" "c" nil) ("ch" "ch" nil) ("cy" "cy" nil) ("d" "d" nil) ("dh" "dh" nil) ("dy" "dy" nil) ("f" "f" nil) ("fy" "fy" nil) ("g" "g" nil) ("gy" "gy" nil) ("h" "h" nil) ("hy" "hy" nil) ("j" "j" nil) ("jy" "jy" nil) ("k" "k" nil) ("ky" "ky" nil) ("m" "m" nil) ("my" "my" nil) ("n" "n" nil) ("ny" "ny" nil) ("p" "p" nil) ("py" "py" nil) ("r" "r" nil) ("ry" "ry" nil) ("s" "s" nil) ("sh" "sh" nil) ("sy" "sy" nil) ("t" "t" nil) ("th" "th" nil) ("ts" "ts" nil) ("ty" "ty" nil) ("v" "v" nil) ("w" "w" nil) ("x" "x" nil) ("xk" "xk" nil) ("xt" "xt" nil) ("xw" "xw" nil) ("xy" "xy" nil) ("y" "y" nil) ("z" "z" nil) ("zy" "zy" nil) ("bb" "b" ("$B%C(B" . "$B$C(B")) ("cc" "c" ("$B%C(B" . "$B$C(B")) ("dd" "d" ("$B%C(B" . "$B$C(B")) ("ff" "f" ("$B%C(B" . "$B$C(B")) ("gg" "g" ("$B%C(B" . "$B$C(B")) ("hh" "h" ("$B%C(B" . "$B$C(B")) ("jj" "j" ("$B%C(B" . "$B$C(B")) ("kk" "k" ("$B%C(B" . "$B$C(B")) ("mm" "m" ("$B%C(B" . "$B$C(B")) ("pp" "p" ("$B%C(B" . "$B$C(B")) ("rr" "r" ("$B%C(B" . "$B$C(B")) ("ss" "s" ("$B%C(B" . "$B$C(B")) ("tt" "t" ("$B%C(B" . "$B$C(B")) ("vv" "v" ("$B%C(B" . "$B$C(B")) ("ww" "w" ("$B%C(B" . "$B$C(B")) ("xx" "x" ("$B%C(B" . "$B$C(B")) ("yy" "y" ("$B%C(B" . "$B$C(B")) ("zz" "z" ("$B%C(B" . "$B$C(B")) ("a" nil ("$B%"(B" . "$B$"(B")) ("ba" nil ("$B%P(B" . "$B$P(B")) ("bya" nil ("$B%S%c(B" . "$B$S$c(B")) ("cha" nil ("$B%A%c(B" . "$B$A$c(B")) ("cya" nil ("$B%A%c(B" . "$B$A$c(B")) ("da" nil ("$B%@(B" . "$B$@(B")) ("dha" nil ("$B%G%c(B" . "$B$G$c(B")) ("dya" nil ("$B%B%c(B" . "$B$B$c(B")) ("fa" nil ("$B%U%!(B" . "$B$U$!(B")) ("fya" nil ("$B%U%c(B" . "$B$U$c(B")) ("ga" nil ("$B%,(B" . "$B$,(B")) ("gya" nil ("$B%.%c(B" . "$B$.$c(B")) ("ha" nil ("$B%O(B" . "$B$O(B")) ("hya" nil ("$B%R%c(B" . "$B$R$c(B")) ("ja" nil ("$B%8%c(B" . "$B$8$c(B")) ("jya" nil ("$B%8%c(B" . "$B$8$c(B")) ("ka" nil ("$B%+(B" . "$B$+(B")) ("kya" nil ("$B%-%c(B" . "$B$-$c(B")) ("ma" nil ("$B%^(B" . "$B$^(B")) ("mya" nil ("$B%_%c(B" . "$B$_$c(B")) ("na" nil ("$B%J(B" . "$B$J(B")) ("nya" nil ("$B%K%c(B" . "$B$K$c(B")) ("pa" nil ("$B%Q(B" . "$B$Q(B")) ("pya" nil ("$B%T%c(B" . "$B$T$c(B")) ("ra" nil ("$B%i(B" . "$B$i(B")) ("rya" nil ("$B%j%c(B" . "$B$j$c(B")) ("sa" nil ("$B%5(B" . "$B$5(B")) ("sha" nil ("$B%7%c(B" . "$B$7$c(B")) ("sya" nil ("$B%7%c(B" . "$B$7$c(B")) ("ta" nil ("$B%?(B" . "$B$?(B")) ("tha" nil ("$B%F%!(B" . "$B$F$!(B")) ("tya" nil ("$B%A%c(B" . "$B$A$c(B")) ("va" nil ("$B%t%!(B" . "$B$&!+$!(B")) ("wa" nil ("$B%o(B" . "$B$o(B")) ("xa" nil ("$B%!(B" . "$B$!(B")) ("xka" nil ("$B%u(B" . "$B$+(B")) ("xwa" nil ("$B%n(B" . "$B$n(B")) ("xya" nil ("$B%c(B" . "$B$c(B")) ("ya" nil ("$B%d(B" . "$B$d(B")) ("za" nil ("$B%6(B" . "$B$6(B")) ("zya" nil ("$B%8%c(B" . "$B$8$c(B")) ("i" nil ("$B%$(B" . "$B$$(B")) ("bi" nil ("$B%S(B" . "$B$S(B")) ("byi" nil ("$B%S%#(B" . "$B$S$#(B")) ("chi" nil ("$B%A(B" . "$B$A(B")) ("cyi" nil ("$B%A%#(B" . "$B$A$#(B")) ("di" nil ("$B%B(B" . "$B$B(B")) ("dhi" nil ("$B%G%#(B" . "$B$G$#(B")) ("dyi" nil ("$B%B%#(B" . "$B$B$#(B")) ("fi" nil ("$B%U%#(B" . "$B$U$#(B")) ("fyi" nil ("$B%U%#(B" . "$B$U$#(B")) ("gi" nil ("$B%.(B" . "$B$.(B")) ("gyi" nil ("$B%.%#(B" . "$B$.$#(B")) ("hi" nil ("$B%R(B" . "$B$R(B")) ("hyi" nil ("$B%R%#(B" . "$B$R$#(B")) ("ji" nil ("$B%8(B" . "$B$8(B")) ("jyi" nil ("$B%8%#(B" . "$B$8$#(B")) ("ki" nil ("$B%-(B" . "$B$-(B")) ("kyi" nil ("$B%-%#(B" . "$B$-$#(B")) ("mi" nil ("$B%_(B" . "$B$_(B")) ("myi" nil ("$B%_%#(B" . "$B$_$#(B")) ("ni" nil ("$B%K(B" . "$B$K(B")) ("nyi" nil ("$B%K%#(B" . "$B$K$#(B")) ("pi" nil ("$B%T(B" . "$B$T(B")) ("pyi" nil ("$B%T%#(B" . "$B$T$#(B")) ("ri" nil ("$B%j(B" . "$B$j(B")) ("ryi" nil ("$B%j%#(B" . "$B$j$#(B")) ("si" nil ("$B%7(B" . "$B$7(B")) ("shi" nil ("$B%7(B" . "$B$7(B")) ("syi" nil ("$B%7%#(B" . "$B$7$#(B")) ("ti" nil ("$B%A(B" . "$B$A(B")) ("thi" nil ("$B%F%#(B" . "$B$F$#(B")) ("tyi" nil ("$B%A%#(B" . "$B$A$#(B")) ("vi" nil ("$B%t%#(B" . "$B$&!+$#(B")) ("wi" nil ("$B%&%#(B" . "$B$&$#(B")) ("xi" nil ("$B%#(B" . "$B$#(B")) ("xwi" nil ("$B%p(B" . "$B$p(B")) ("zi" nil ("$B%8(B" . "$B$8(B")) ("zyi" nil ("$B%8%#(B" . "$B$8$#(B")) ("u" nil ("$B%&(B" . "$B$&(B")) ("bu" nil ("$B%V(B" . "$B$V(B")) ("byu" nil ("$B%S%e(B" . "$B$S$e(B")) ("chu" nil ("$B%A%e(B" . "$B$A$e(B")) ("cyu" nil ("$B%A%e(B" . "$B$A$e(B")) ("du" nil ("$B%E(B" . "$B$E(B")) ("dhu" nil ("$B%G%e(B" . "$B$G$e(B")) ("dyu" nil ("$B%B%e(B" . "$B$B$e(B")) ("fu" nil ("$B%U(B" . "$B$U(B")) ("fyu" nil ("$B%U%e(B" . "$B$U$e(B")) ("gu" nil ("$B%0(B" . "$B$0(B")) ("gyu" nil ("$B%.%e(B" . "$B$.$e(B")) ("hu" nil ("$B%U(B" . "$B$U(B")) ("hyu" nil ("$B%R%e(B" . "$B$R$e(B")) ("ju" nil ("$B%8%e(B" . "$B$8$e(B")) ("jyu" nil ("$B%8%e(B" . "$B$8$e(B")) ("ku" nil ("$B%/(B" . "$B$/(B")) ("kyu" nil ("$B%-%e(B" . "$B$-$e(B")) ("mu" nil ("$B%`(B" . "$B$`(B")) ("myu" nil ("$B%_%e(B" . "$B$_$e(B")) ("nu" nil ("$B%L(B" . "$B$L(B")) ("nyu" nil ("$B%K%e(B" . "$B$K$e(B")) ("pu" nil ("$B%W(B" . "$B$W(B")) ("pyu" nil ("$B%T%e(B" . "$B$T$e(B")) ("ru" nil ("$B%k(B" . "$B$k(B")) ("ryu" nil ("$B%j%e(B" . "$B$j$e(B")) ("su" nil ("$B%9(B" . "$B$9(B")) ("shu" nil ("$B%7%e(B" . "$B$7$e(B")) ("syu" nil ("$B%7%e(B" . "$B$7$e(B")) ("tu" nil ("$B%D(B" . "$B$D(B")) ("thu" nil ("$B%F%e(B" . "$B$F$e(B")) ("tsu" nil ("$B%D(B" . "$B$D(B")) ("tyu" nil ("$B%A%e(B" . "$B$A$e(B")) ("vu" nil ("$B%t(B" . "$B$&!+(B")) ("wu" nil ("$B%&(B" . "$B$&(B")) ("xu" nil ("$B%%(B" . "$B$%(B")) ("xtu" nil ("$B%C(B" . "$B$C(B")) ("xtsu" nil ("$B%C(B" . "$B$C(B")) ("xyu" nil ("$B%e(B" . "$B$e(B")) ("yu" nil ("$B%f(B" . "$B$f(B")) ("zu" nil ("$B%:(B" . "$B$:(B")) ("zyu" nil ("$B%8%e(B" . "$B$8$e(B")) ("e" nil ("$B%((B" . "$B$((B")) ("be" nil ("$B%Y(B" . "$B$Y(B")) ("bye" nil ("$B%S%'(B" . "$B$S$'(B")) ("che" nil ("$B%A%'(B" . "$B$A$'(B")) ("cye" nil ("$B%A%'(B" . "$B$A$'(B")) ("de" nil ("$B%G(B" . "$B$G(B")) ("dhe" nil ("$B%G%'(B" . "$B$G$'(B")) ("dye" nil ("$B%B%'(B" . "$B$B$'(B")) ("fe" nil ("$B%U%'(B" . "$B$U$'(B")) ("fye" nil ("$B%U%'(B" . "$B$U$'(B")) ("ge" nil ("$B%2(B" . "$B$2(B")) ("gye" nil ("$B%.%'(B" . "$B$.$'(B")) ("he" nil ("$B%X(B" . "$B$X(B")) ("hye" nil ("$B%R%'(B" . "$B$R$'(B")) ("je" nil ("$B%8%'(B" . "$B$8$'(B")) ("jye" nil ("$B%8%'(B" . "$B$8$'(B")) ("ke" nil ("$B%1(B" . "$B$1(B")) ("kye" nil ("$B%-%'(B" . "$B$-$'(B")) ("me" nil ("$B%a(B" . "$B$a(B")) ("mye" nil ("$B%_%'(B" . "$B$_$'(B")) ("ne" nil ("$B%M(B" . "$B$M(B")) ("nye" nil ("$B%K%'(B" . "$B$K$'(B")) ("pe" nil ("$B%Z(B" . "$B$Z(B")) ("pye" nil ("$B%T%'(B" . "$B$T$'(B")) ("re" nil ("$B%l(B" . "$B$l(B")) ("rye" nil ("$B%j%'(B" . "$B$j$'(B")) ("se" nil ("$B%;(B" . "$B$;(B")) ("she" nil ("$B%7%'(B" . "$B$7$'(B")) ("sye" nil ("$B%7%'(B" . "$B$7$'(B")) ("te" nil ("$B%F(B" . "$B$F(B")) ("the" nil ("$B%F%'(B" . "$B$F$'(B")) ("tye" nil ("$B%A%'(B" . "$B$A$'(B")) ("ve" nil ("$B%t%'(B" . "$B$&!+$'(B")) ("we" nil ("$B%&%'(B" . "$B$&$'(B")) ("xe" nil ("$B%'(B" . "$B$'(B")) ("xke" nil ("$B%v(B" . "$B$1(B")) ("xwe" nil ("$B%q(B" . "$B$q(B")) ("ye" nil ("$B%$%'(B" . "$B$$$'(B")) ("ze" nil ("$B%<(B" . "$B$<(B")) ("zye" nil ("$B%8%'(B" . "$B$8$'(B")) ("o" nil ("$B%*(B" . "$B$*(B")) ("bo" nil ("$B%\(B" . "$B$\(B")) ("byo" nil ("$B%S%g(B" . "$B$S$g(B")) ("cho" nil ("$B%A%g(B" . "$B$A$g(B")) ("cyo" nil ("$B%A%g(B" . "$B$A$g(B")) ("do" nil ("$B%I(B" . "$B$I(B")) ("dho" nil ("$B%G%g(B" . "$B$G$g(B")) ("dyo" nil ("$B%B%g(B" . "$B$B$g(B")) ("fo" nil ("$B%U%)(B" . "$B$U$)(B")) ("fyo" nil ("$B%U%g(B" . "$B$U$g(B")) ("go" nil ("$B%4(B" . "$B$4(B")) ("gyo" nil ("$B%.%g(B" . "$B$.$g(B")) ("ho" nil ("$B%[(B" . "$B$[(B")) ("hyo" nil ("$B%R%g(B" . "$B$R$g(B")) ("jo" nil ("$B%8%g(B" . "$B$8$g(B")) ("jyo" nil ("$B%8%g(B" . "$B$8$g(B")) ("ko" nil ("$B%3(B" . "$B$3(B")) ("kyo" nil ("$B%-%g(B" . "$B$-$g(B")) ("mo" nil ("$B%b(B" . "$B$b(B")) ("myo" nil ("$B%_%g(B" . "$B$_$g(B")) ("no" nil ("$B%N(B" . "$B$N(B")) ("nyo" nil ("$B%K%g(B" . "$B$K$g(B")) ("po" nil ("$B%](B" . "$B$](B")) ("pyo" nil ("$B%T%g(B" . "$B$T$g(B")) ("ro" nil ("$B%m(B" . "$B$m(B")) ("ryo" nil ("$B%j%g(B" . "$B$j$g(B")) ("so" nil ("$B%=(B" . "$B$=(B")) ("sho" nil ("$B%7%g(B" . "$B$7$g(B")) ("syo" nil ("$B%7%g(B" . "$B$7$g(B")) ("to" nil ("$B%H(B" . "$B$H(B")) ("tho" nil ("$B%F%g(B" . "$B$F$g(B")) ("tyo" nil ("$B%A%g(B" . "$B$A$g(B")) ("vo" nil ("$B%t%)(B" . "$B$&!+$)(B")) ("wo" nil ("$B%r(B" . "$B$r(B")) ("xo" nil ("$B%)(B" . "$B$)(B")) ("xyo" nil ("$B%g(B" . "$B$g(B")) ("yo" nil ("$B%h(B" . "$B$h(B")) ("zo" nil ("$B%>(B" . "$B$>(B")) ("zyo" nil ("$B%8%g(B" . "$B$8$g(B")) ("nn" nil ("$B%s(B" . "$B$s(B")) ("n'" nil ("$B%s(B" . "$B$s(B")) ("z/" nil ("$B!&(B" . "$B!&(B")) ("z," nil ("$B!E(B" . "$B!E(B")) ("z." nil ("$B!D(B" . "$B!D(B")) ("z-" nil ("$B!A(B" . "$B!A(B")) ("zh" nil ("$B"+(B" . "$B"+(B")) ("zj" nil ("$B"-(B" . "$B"-(B")) ("zk" nil ("$B",(B" . "$B",(B")) ("zl" nil ("$B"*(B" . "$B"*(B")) ("z[" nil ("$B!X(B" . "$B!X(B")) ("z]" nil ("$B!Y(B" . "$B!Y(B"))) "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
430 SKK $B$NI8=`$N%m!<%^;z$+$JJQ49$N%*!<%H%^%H%s$N>uBVA+0\5,B'!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
431 $B%j%9%H$N3FMWAG$O!"(B($B8=:_$N>uBV(B@$BF~NO(B $B<!$N>uBV(B $B=PNO(B) ($BC"$7!"(B\"@\" $B$OO"@\(B) $B$r0UL#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
432 $B$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
433 $B%7%9%F%`MQ$J$N$G%+%9%?%^%$%:$K$O(B skk-rom-kana-rule-list $B$rMxMQ$7$F$/$@$5$$!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
434
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
435 (defvar skk-rom-kana-rule-list nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
436 *$B%m!<%^;z$+$JJQ49$N%*!<%H%^%H%s$N>uBVA+0\5,B'!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
437 $B%j%9%H$N3FMWAG$O!"(B($B8=:_$N>uBV(B@$BF~NO(B $B<!$N>uBV(B $B=PNO(B) ($BC"$7!"(B\"@\" $B$OO"@\(B) $B$r0UL#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
438 $B$9$k!#%+%9%?%^%$%:$K$O(B skk-standard-rom-kana-rule-list $B$G$OL5$/!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
439 $B$3$A$i$rMxMQ$7$F$/$@$5$$!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
440
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
441 (defvar skk-fallback-rule-alist '(("n" "$B%s(B" . "$B$s(B")) "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
442 *$B%m!<%^;z$+$JJQ49;~$K!"(Bskk-rom-kana-rule-list, skk-standard-rom-kana-rule-list $B$N(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
443 $B$"$H$K;2>H$5$l$k5,B'!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
444 $B%j%9%H$N3FMWAG$O!"(B($B8=:_$N>uBV(B $B=PNO(B) $B$r0UL#$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
445 $B$3$N5,B'$,E,MQ$5$l$?>l9g!"F~NO$O%9%H%j!<%`$KJV$5$l$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
446
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
447 (defvar skk-postfix-rule-alist '(("oh" "$B%*(B" . "$B$*(B")) "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
448 *$B%m!<%^;z$+$JJQ49;~$K!"D>A0$N$+$JJ8;z$r:n$k$N$KMQ$$$i$l$?:G8e$NF~NO$H(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
449 $B8=:_$NF~NO$+$i$+$JJ8;z$r:n$j$@$9$?$a$N5,B'!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
450 $B%j%9%H$N3FMWAG$O!"(B($BD>A0$NF~NO(B@$BF~NO(B $B=PNO(B) ($BC"$7!"(B\"@\" $B$OO"@\(B) $B$r0UL#$9$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
451
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
452 (defvar skk-previous-candidate-char ?x "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
453 *skk-previous-candidate $B$r3dEv$F$?%-%c%i%/%?!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
454
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
455 (defvar skk-okuri-char-alist nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
456 *")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
457
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
458 (defvar skk-downcase-alist nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
459 *")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
460
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
461 (defvar skk-input-vector [nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil "$B!*(B" nil nil nil nil nil nil nil nil nil nil "$B!"(B" "$B!<(B" "$B!#(B" nil nil nil nil nil nil nil nil nil nil nil "$B!'(B" "$B!((B" nil nil nil "$B!)(B" nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil "$B!V(B" nil "$B!W(B" nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil] "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
462 *skk-self-insert $B$G;2>H$5$l$kJ8;z%F!<%V%k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
463 $B%-!<$KBP1~$9$k0LCV$KJ8;zNs$,$"$l$P!"$R$i$,$J%b!<%I$b$7$/$O%+%?%+%J%b!<%I$G!"3:(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
464 $BEv$N%-!<$r2!$9$3$H$G!"BP1~$9$kJ8;z$,A^F~$5$l$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
465 $BNc$($P!"(B\"~\" $B%-!<$KBP1~$7$F!"(B\"$B!A(B\" $B$rA^F~$5$;$k$h$&$KJQ99$7$?$1$l$P!"(Bskk.el
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
466 $B$N%m!<%I8e(B ($B$b$7$/$O(B skk-load-hook $B$rMxMQ$7$F(B)$B!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
467
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
468 (aset skk-input-vector 126 \"$B!A(B\")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
469
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
470 $B$H$9$k$+!"$b$7$/$O!"(Bskk-input-vector $B$N(B 126 $BHVL\(B (0 $BHV$+$i?t$($F(B) $B$NCM$r(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
471 \"$B!A(B\" $B$H$9$k$h$&$J(B skk-input-vector $B$rD>@\=q$-!"(Bsetq $B$GBeF~$9$k(B (126 $B$O!"(B?
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
472 { $B$rI>2A$7$?$H$-$NCM(B)$B!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
473
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
474 (defvar skk-zenkaku-vector [nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil nil "$B!!(B" "$B!*(B" "$B!I(B" "$B!t(B" "$B!p(B" "$B!s(B" "$B!u(B" "$B!G(B" "$B!J(B" "$B!K(B" "$B!v(B" "$B!\(B" "$B!$(B" "$B!](B" "$B!%(B" "$B!?(B" "$B#0(B" "$B#1(B" "$B#2(B" "$B#3(B" "$B#4(B" "$B#5(B" "$B#6(B" "$B#7(B" "$B#8(B" "$B#9(B" "$B!'(B" "$B!((B" "$B!c(B" "$B!a(B" "$B!d(B" "$B!)(B" "$B!w(B" "$B#A(B" "$B#B(B" "$B#C(B" "$B#D(B" "$B#E(B" "$B#F(B" "$B#G(B" "$B#H(B" "$B#I(B" "$B#J(B" "$B#K(B" "$B#L(B" "$B#M(B" "$B#N(B" "$B#O(B" "$B#P(B" "$B#Q(B" "$B#R(B" "$B#S(B" "$B#T(B" "$B#U(B" "$B#V(B" "$B#W(B" "$B#X(B" "$B#Y(B" "$B#Z(B" "$B!N(B" "$B!@(B" "$B!O(B" "$B!0(B" "$B!2(B" "$B!F(B" "$B#a(B" "$B#b(B" "$B#c(B" "$B#d(B" "$B#e(B" "$B#f(B" "$B#g(B" "$B#h(B" "$B#i(B" "$B#j(B" "$B#k(B" "$B#l(B" "$B#m(B" "$B#n(B" "$B#o(B" "$B#p(B" "$B#q(B" "$B#r(B" "$B#s(B" "$B#t(B" "$B#u(B" "$B#v(B" "$B#w(B" "$B#x(B" "$B#y(B" "$B#z(B" "$B!P(B" "$B!C(B" "$B!Q(B" "$B!A(B" nil] "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
475 *skk-zenkaku-insert $B$G;2>H$5$l$kJ8;z%F!<%V%k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
476 $B%-!<$KBP1~$9$k0LCV$KJ8;zNs$,$"$l$P!"A41Q%b!<%I$G3:Ev$N%-!<$r2!$9$3$H$G!"BP1~$9(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
477 $B$kJ8;z$,A^F~$5$l$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
478 $BCM$NJQ99J}K!$K$D$$$F$O!"(Bskk-input-vector $B$r;2>H$N$3$H!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
479
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
480 (defvar skk-use-face (or window-system (skk-terminal-face-p)) "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
481 *Non-nil $B$G$"$l$P!"(BEmacs 19 $B$N(B face $B$N5!G=$r;HMQ$7$FJQ49I=<($J$I$r9T$J$&!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
482
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
483 (defvar skk-henkan-face (if (and (or window-system (skk-terminal-face-p)) (or (and (fboundp 'frame-face-alist) (assq 'highlight (frame-face-alist (selected-frame)))) (and (fboundp 'face-list) (memq 'highlight (face-list))))) 'highlight) "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
484 *$BJQ498uJd$N(B face $BB0@-!#(Bskk-use-face $B$,(B non-nil $B$N$H$-$N$_M-8z!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
485 Emacs $BI8=`%U%'%$%9$N(B default, modeline, region, secondary-selection,
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
486 highlight, underline, bold, italic, bold-italic $B$NB>!"?7$?$K(B face $B$r:n$j;XDj$9(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
487 $B$k$3$H$b2DG=!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
488 $B?7$?$J(B face $B$r:n$j;XDj$9$k$K$O(B skk-make-face $B$rMxMQ$7$F!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
489
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
490 (skk-make-face 'DimGray/PeachPuff1)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
491 (setq skk-henkan-face 'DimGray/PeachPuff1)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
492
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
493 $B$N$h$&$K$9$k$N$,<j7Z!#(Bforeground $B$H(B background $B$N?';XDj$@$1$G$J$$6E$C$?(B face
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
494 $B$r:n$k>l9g$O!"(Bskk-make-face $B$G$OBP1~$G$-$J$$$N$G!"(BEmacs $B$N(B hilit19.el $B$N(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
495 hilit-lookup-face-create $B$J$I$rMxMQ$9$k!#?'$rIU$1$k>l9g$NG[?'$O!"(Bcanna.el $B$N(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
496 canna:attribute-alist $B$,NI$$Nc$+$b$7$l$J$$!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
497
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
498 (defvar skk-use-color-cursor (and window-system (fboundp 'x-display-color-p) (x-display-color-p)) "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
499 *Non-nil $B$G$"$l$P!"(BSKK $B%b!<%I$NF~NO%b!<%I$K1~$8$F%+!<%=%k$K?'$rIU$1$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
500
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
501 (defvar skk-hirakana-cursor-color (if (eq skk-background-mode 'light) "coral4" "pink") "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
502 *$B$+$J%b!<%I$r<($9%+!<%=%k?'!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
503
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
504 (defvar skk-katakana-cursor-color (if (eq skk-background-mode 'light) "forestgreen" "green") "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
505 *$B%+%?%+%J%b!<%I$r<($9%+!<%=%k?'!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
506
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
507 (defvar skk-zenkaku-cursor-color "gold" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
508 *$BA43Q1Q;z%b!<%I$r<($9%+!<%=%k?'!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
509
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
510 (defvar skk-ascii-cursor-color (if (eq skk-background-mode 'light) "ivory4" "gray") "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
511 *$B%"%9%-!<%b!<%I$r<($9%+!<%=%k?'!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
512
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
513 (defvar skk-abbrev-cursor-color "royalblue" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
514 *$B%"%9%-!<%b!<%I$r<($9%+!<%=%k?'!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
515
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
516 (defvar skk-report-set-cursor-error t "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
517 *Non-nil $B$G$"$l$P!"%+%i!<%^%C%W@Z$l$,5/$-$?>l9g!"%(%i!<%a%C%;!<%8$rI=<($9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
518 nil $B$G$"$l$P!"I=<($7$J$$!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
519
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
520 (defvar skk-use-cursor-change t "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
521 *Non-nil $B$G$"$l$P!"(BOvwrt $B%^%$%J!<%b!<%I;~$K%+!<%=%k$NI}$r=L$a$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
522
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
523 (defvar skk-auto-insert-paren nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
524 *Non-nil $B$G$"$l$P!"(B2 $B$D$NJ8;zNs$r$^$H$a$FA^F~$7!"$=$NJ8;zNs$N4V$K%+!<%=%k$r0\F0$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
525 $BNc$($P!"(B\"$B!V(B\" $B$rF~NO$7$?$H$-$K(B \"$B!W(B\" $B$r<+F0E*$KA^F~$7!"N>$+$.$+$C$3$N4V$K(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
526 $B%+!<%=%k$r0\F0$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
527 $BA^F~$9$kJ8;zNs$O!"(Bskk-auto-paren-string-alist $B$G;XDj$9$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
528
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
529 (defvar skk-auto-paren-string-alist '(("$B!V(B" . "$B!W(B") ("$B!X(B" . "$B!Y(B") ("(" . ")") ("$B!J(B" . "$B!K(B") ("{" . "}") ("$B!P(B" . "$B!Q(B") ("$B!R(B" . "$B!S(B") ("$B!T(B" . "$B!U(B") ("[" . "]") ("$B!N(B" . "$B!O(B") ("$B!L(B" . "$B!M(B") ("$B!Z(B" . "$B![(B") ("\"" . "\"") ("$B!H(B" . "$B!I(B")) "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
530 *$B<+F0E*$KBP$K$J$kJ8;zNs$rF~NO$9$k$?$a$NO"A[%j%9%H!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
531 car $B$NJ8;zNs$,A^F~$5$l$?$H$-$K(B cdr $B$NJ8;zNs$r<+F0E*$KA^F~$9$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
532
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
533 (defvar skk-japanese-message-and-error nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
534 *Non-nil $B$G$"$l$P!"(BSKK $B$N%a%C%;!<%8$H%(%i!<$rF|K\8l$GI=<($9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
535 nil $B$G$"$l$P!"1Q8l$GI=<($9$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
536
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
537 (defvar skk-ascii-mode-map nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
538 *ASCII $B%b!<%I$N%-!<%^%C%W!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
539
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
540 (defvar skk-j-mode-map nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
541 *$B$+$J%b!<%I$N%-!<%^%C%W!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
542
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
543 (defvar skk-zenkaku-mode-map nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
544 *$BA43Q%b!<%I$N%-!<%^%C%W!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
545
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
546 (defvar skk-abbrev-mode-map nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
547 *SKK abbrev $B%b!<%I$N%-!<%^%C%W!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
548
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
549 (defvar skk-jisyo-save-count 50 "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
550 *$B?tCM$G$"$l$P!"$=$N2s?t<-=q$,99?7$5$l$?$H$-$K<-=q$r<+F0E*$K%;!<%V$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
551 nil $B$G$"$l$P!"<-=q$N%*!<%H%;!<%V$r9T$J$o$J$$!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
552
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
553 (defvar skk-byte-compile-init-file t "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
554 *Non-nil $B$G$"$l$P!"(Bskk-mode $B5/F0;~$K(B skk-init-file $B$r%P%$%H%3%s%Q%$%k$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
555 $B@53N$K8@$&$H!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
556
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
557 (1)skk-init-file $B$r%P%$%H%3%s%Q%$%k$7$?%U%!%$%k$,$J$$$+!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
558 (2)skk-init-file $B$H$=$N%P%$%H%3%s%Q%$%k:Q%U%!%$%k$rHf3S$7$F!"A0<T$NJ}$,?7$7(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
559 $B$$$H$-(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
560
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
561 $B$K(B skk-init-file $B$r%P%$%H%3%s%Q%$%k$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
562 nil $B$G$"$l$P!"(Bskk-init-file $B$H$=$N%P%$%H%3%s%Q%$%k:Q$_%U%!%$%k$rHf3S$7$F(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
563 skk-init-file $B$NJ}$,?7$7$$$H$-$O!"$=$N%P%$%H%3%s%Q%$%k:Q%U%!%$%k$r>C$9!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
564
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
565 (defvar skk-count-private-jisyo-candidates-exactly nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
566 *Non-nil $B$G$"$l$P!"(BEmacs $B$r=*N;$9$k$H$-$K@53N$K8D?M<-=q$N8uJd?t$r?t$($k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
567 nil $B$G$"$l$P!"(B1 $B9T$KJ#?t$N8uJd$,$"$C$F$b(B 1 $B8uJd$H$7$F?t$($k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
568 $B7W;;7k2L$O!"(Bskk-record-file $B$KJ]B8$5$l$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
569
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
570 (defvar skk-compare-jisyo-size-when-saving t "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
571 *Non-nil $B$G$"$l$P!"(Bskk-jisyo $B$N%;!<%V;~$K%U%!%$%k%5%$%:$N%A%'%C%/$r9T$J$&!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
572 $BA02s%;!<%V$7$?(B skk-jisyo $B$H:#2s%;!<%V$7$h$&$H$9$k<-=q$H$N%5%$%:Hf3S$r9T$J$$!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
573 $B8e<T$NJ}$,Bg$-$$$H$-$K%f!<%6!<$K%;!<%V$rB3$1$k$+$I$&$+$N3NG'$r5a$a$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
574
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
575 (defvar skk-auto-start-henkan t "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
576 $BC18l$dJ8@a$N6h@Z$j$r<($9J8;z$NBG80$K$h$j<+F0E*$KJQ49$r3+;O$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
577 skk-auto-start-henkan-keyword-list $B$K$h$jC18l$dJ8@a$N6h@Z$j$r<($9J8;z$r;XDj$9$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
578
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
579 (defvar skk-auto-start-henkan-keyword-list '("$B$r(B" "$B!"(B" "$B!#(B" "$B!%(B" "$B!$(B" "$B!)(B" "$B!W(B" "$B!*(B" "$B!((B" "$B!'(B" ")" ";" ":" "$B!K(B" "$B!I(B" "$B![(B" "$B!Y(B" "$B!U(B" "$B!S(B" "$B!Q(B" "$B!O(B" "$B!M(B" "}" "]" "?" "." "," "!") "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
580 $B<+F0JQ49$r3+;O$9$k%-!<%o!<%I!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
581 $B$3$N%j%9%H$NMWAG$NJ8;z$rA^F~$9$k$H!"(BSPC $B$r2!$9$3$H$J$/<+F0E*$KJQ49$r3+;O$9$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
582
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
583 (defvar skk-search-excluding-word-pattern-function nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
584 *$B8D?M<-=q$K<h$j9~$^$J$$J8;zNs$N%Q%?!<%s$r8!:w$9$k4X?t$r;XDj$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
585 $B3NDj$7$?J8;zNs$r0z?t$KEO$7$F(B funcall $B$5$l$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
586
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
587 SKK $B$G$OJQ49!"3NDj$r9T$J$C$?J8;zNs$OA4$F8D?M<-=q$K<h$j9~$^$l$k$,!"$3$NJQ?t$G;X(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
588 $BDj$5$l$?4X?t$,(B non-nil $B$rJV$9$H$=$NJ8;zNs$O8D?M<-=q$K<h$j9~$^$l$J$$!#Nc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
589 $B$3$NJQ?t$K2<5-$N$h$&$J;XDj$9$k$H!"(BSKK abbrev mode $B$G$NJQ49$r=|$-!"%+%?%+%J$N$_(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
590 $B$+$i$J$kJ8;zNs$rJQ49$K$h$jF@$F3NDj$7$F$b!"$=$l$r8D?M<-=q$K<h$j9~$^$J$$!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
591
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
592 $B%+%?%+%J$rJQ49$K$h$j5a$a$?$$$,!"8D?M<-=q$K$O%+%?%+%J$N$_$N8uJd$r<h$j9~$_$?$/$J(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
593 $B$$!"$J$I!"8D?M<-=q$,I,MW0J>e$KKD$l$k$N$rM^$($kL\E*$K;HMQ$G$-$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
594
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
595 $B8D?M<-=q$K<h$j9~$^$J$$J8;zNs$K$D$$$F$OJd40$,8z$+$J$$$N$G!"Cm0U$9$k$3$H!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
596
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
597 (setq skk-search-excluding-word-pattern-function
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
598 (function
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
599 (lambda (kakutei-word)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
600 ;; $B$3$N4X?t$,(B t $B$rJV$7$?$H$-$O!"$=$NJ8;zNs$O8D?M<-=q$K<h$j9~$^$l$J$$!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
601 (save-match-data
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
602 (and
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
603 ;; $BAw$j$J$7JQ49$G!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
604 (not skk-okuri-char)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
605 ;; $B3NDj8l$,%+%?%+%J$N$_$+$i9=@.$5$l$F$$$F!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
606 (string-match \"^[$B!<%!(B-$B%s(B]+$\" kakutei-word)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
607 ;; SKK abbrev mode $B0J30$G$NJQ49$+!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
608 (or (not skk-abbrev-mode)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
609 ;; $B8+=P$78l$,%+%?%+%J!"$R$i$,$J0J30$N$H$-!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
610 ;; ($B8e$G"&%^!<%/$rIU$1$?$H$-$O!"8+=P$78l$,1QJ8;z$G$b!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
611 ;; skk-abbrev-mode$B$,(B t $B$K$J$C$F$$$J$$(B)$B!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
612 (not (string-match \"^[^$B!<%!(B-$B%s$!(B-$B$s(B]+$\" skk-henkan-key)) )))))) ")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
613
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
614 (defconst skk-kanji-len (length "$B$"(B") "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
615 $B4A;z0lJ8;z$ND9$5!#(BMule $B$G$O(B 3 $B$K$J$k!#(BXEmacs $B$G$O(B 1$B!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
616
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
617 (defvar skk-insert-new-word-function nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
618 $B8uJd$rA^F~$7$?$H$-$K(B funcall $B$5$l$k4X?t$rJ]B8$9$kJQ?t!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
619
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
620 (defvar skk-input-mode-string skk-hirakana-mode-string "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
621 SKK $B$NF~NO%b!<%I$r<($9J8;zNs!#(Bskk-mode $B5/F0;~$O!"(Bskk-hirakana-mode-string$B!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
622
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
623 (defvar skk-isearch-message nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
624 skk-isearch $B4X?t$r%3!<%k$9$k$?$a$N%U%i%0!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
625 Non-nil $B$G$"$l$P!"(Bskk-isearch-message $B4X?t$r%3!<%k$9$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
626
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
627 (defvar skk-mode-invoked nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
628 Non-nil $B$G$"$l$P!"(BEmacs $B$r5/F08e4{$K(B skk-mode $B$r5/F0$7$?$3$H$r<($9!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
629
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
630 (skk-deflocalvar skk-mode nil "Non-nil $B$G$"$l$P!"%+%l%s%H%P%C%U%!$G8=:_(B skk-mode $B$r5/F0$7$F$$$k$3$H$r<($9!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
631
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
632 (skk-deflocalvar skk-ascii-mode nil "Non-nil $B$G$"$l$P!"F~NO%b!<%I$,(B ASCII $B%b!<%I$G$"$k$3$H$r<($9!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
633
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
634 (skk-deflocalvar skk-j-mode nil "Non-nil $B$G$"$l$P!"F~NO%b!<%I$,$+$J!&%+%J%b!<%I$G$"$k$3$H$r<($9!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
635
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
636 (skk-deflocalvar skk-katakana nil "Non-nil $B$G$"$l$P!"F~NO%b!<%I$,%+%J%b!<%I$G$"$k$3$H$r<($9!#(B\n\"(and (not skk-katakana) skk-j-mode))\" $B$,(B t $B$G$"$l$P!"$+$J%b!<%I$G$"$k$3$H$r(B\n$B<($9!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
637
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
638 (skk-deflocalvar skk-zenkaku-mode nil "Non-nil $B$G$"$l$P!"F~NO%b!<%I$,A41Q%b!<%I$G$"$k$3$H$r<($9!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
639
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
640 (skk-deflocalvar skk-abbrev-mode nil "Non-nil $B$G$"$l$P!"F~NO%b!<%I$,(B SKK abbrev $B%b!<%I$G$"$k$3$H$r<($9!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
641
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
642 (skk-deflocalvar skk-okurigana nil "Non-nil $B$G$"$l$P!"Aw$j2>L>ItJ,$,F~NOCf$G$"$k$3$H$r<($9!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
643
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
644 (skk-deflocalvar skk-henkan-on nil "Non-nil $B$G$"$l$P!""&%b!<%I(B ($BJQ49BP>]$NJ8;zNs7hDj$N$?$a$N%b!<%I(B) $B$G$"$k$3$H$r<($9!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
645
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
646 (skk-deflocalvar skk-henkan-active nil "Non-nil $B$G$"$l$P!""'%b!<%I(B ($BJQ49Cf(B) $B$G$"$k$3$H$r<($9!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
647
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
648 (skk-deflocalvar skk-kakutei-flag nil "Non-nil $B$J$i3NDj$7$FNI$$8uJd$r8+$D$1$?>uBV$G$"$k$3$H$r;X$9!#(B\nskk-henkan, skk-search-kakutei-jisyo-file, skk-henkan-show-candidates,\nskk-henkan-in-minibuff $B$H(B skk-kakutei-save-and-init-variables $B$GJQ99!";2>H$5$l(B\n$B$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
649
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
650 (skk-deflocalvar skk-prefix "" "$BF~NO$9$k$+$J$r7hDj$9$k$?$a$N%W%l%U%#%C%/%9!#(B\n$B8e$GF~NO$5$l$kJl2;$KBP1~$7$?(B skk-roma-kana-[aiue] $BO"A[%j%9%H$G!"$=$N(B\nskk-prefix $B$r%-!<$K$7$FF~NO$9$Y$-$+$JJ8;z$,7hDj$5$l$k!#(B\n$BNc$($P!"(B\"$B$+(B\" $B$N$h$&$K(B \"k\" $B$+$i;O$^$k;R2;$rF~NO$7$F$$$k$H$-$O!"(Bskk-prefix\n$B$O!"(B\"k\" $B$G!"$=$N<!$KF~NO$5$l$?Jl2;(B \"a\" $B$KBP1~$9$k(B skk-roma-kana-a $B$NCf$N(B\n\"k\" $B$r%-!<$K;}$DCM!"(B\"$B$+(B\" $B$b$7$/$O(B \"$B%+(B\" $B$,F~NO$9$Y$-$+$JJ8;z$H$J$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
651
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
652 (skk-deflocalvar skk-henkan-start-point nil "$BJQ493+;O%]%$%s%H$r<($9%^!<%+!<!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
653
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
654 (skk-deflocalvar skk-kana-start-point nil "$B$+$JJ8;z$N3+;O%]%$%s%H$r<($9%^!<%+!<!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
655
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
656 (skk-deflocalvar skk-henkan-key nil "$BJQ49$9$Y$-8+=P$78l!#(B\n$BNc$($P!"(B\"$B"&$+$J(B\" $B$rJQ49$9$l$P!"(Bskk-henkan-key $B$K$O(B \"$B$+$J(B\" $B$,BeF~$5$l$k!#(B\n\"$B"&$o$i(B*$B$&(B\" $B$N$h$&$JAw$j$"$j$NJQ49$N>l9g$K$O!"(B\"$B$o$i(Bu\" $B$N$h$&$K!"4A;zItJ,$N(B\n$BFI$_$,$J(B + $BAw$j2>L>$N:G=i$NJ8;z$N%m!<%^;z$N%W%l%U%#%C%/%9$,BeF~$5$l$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
657
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
658 (skk-deflocalvar skk-okuri-char nil "$BJQ49$9$Y$-8l$NAw$j2>L>$NItJ,$N%W%l%U%#%C%/%9!#(B\n$BNc$($P!"(B\"$B$*$/(B*$B$j(B\" $B$rJQ49$9$k$H$-$O!"(Bskk-okuri-char $B$O(B \"r\"$B!#(B\nskk-okuri-char $B$,(B non-nil $B$G$"$l$P!"Aw$j$"$j$NJQ49$G$"$k$3$H$r<($9!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
659
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
660 (skk-deflocalvar skk-henkan-okurigana nil "$B8=:_$NJQ49$NAw$j2>L>ItJ,!#(B\n$BNc$($P!"(B\"$B"&$&$^$l(B*$B$k(B\" $B$rJQ49$9$l$P!"(Bskk-henkan-okurigana $B$K$O(B \"$B$k(B\" $B$,BeF~(B\n$B$5$l$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
661
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
662 (skk-deflocalvar skk-henkan-list nil "$BJQ497k2L$N8uJd$N%j%9%H!#(B\n$BNc$($P!"(B\"$B"&$J(B*$B$/(B\" $B$H$$$&JQ49$9$l$P!"(Bskk-henkan-list $B$O(B\n(\"$BLD(B\" \"$B5c(B\" \"$BL5(B\" \"$BK4(B\") $B$N$h$&$K$J$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
663
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
664 (skk-deflocalvar skk-henkan-count -1 "skk-henkan-list $B$N%j%9%H$N%$%s%G%/%9$G8=:_$N8uJd$r:9$9$b$N!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
665
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
666 (skk-deflocalvar skk-current-search-prog-list nil "skk-search-prog-list $B$N8=:_$NCM$rJ]B8$9$k%j%9%H!#(B\n$B:G=i$NJQ49;~$O(B skk-search-prog-list $B$NA4$F$NCM$rJ];}$7!"JQ49$r7+$jJV$9$?$S$K(B 1\n$B$D$E$DC;$/$J$C$F$f$/!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
667
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
668 (defvar skk-menu-modified-user-option nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
669 SKK $B%a%K%e!<%3%^%s%I$GJQ99$5$l$?%f!<%6!<JQ?tJ];}$9$k%j%9%H!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
670
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
671 (autoload 'skk-save-point "skk" nil nil 'macro)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
672
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
673 (autoload 'skk-message "skk" nil nil 'macro)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
674
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
675 (autoload 'skk-error "skk" nil nil 'macro)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
676
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
677 (autoload 'skk-yes-or-no-p "skk" nil nil 'macro)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
678
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
679 (autoload 'skk-y-or-n-p "skk" nil nil 'macro)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
680
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
681 (autoload 'skk-set-marker "skk" nil nil 'macro)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
682
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
683 (defsubst skk-j-mode-on (&optional katakana) (setq skk-mode t skk-abbrev-mode nil skk-ascii-mode nil skk-j-mode t skk-zenkaku-mode nil skk-katakana katakana) (if katakana (progn (setq skk-input-mode-string skk-katakana-mode-string) (skk-set-cursor-color skk-katakana-cursor-color)) (setq skk-input-mode-string skk-hirakana-mode-string) (skk-set-cursor-color skk-hirakana-cursor-color)) (force-mode-line-update))
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
684
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
685 (defsubst skk-ascii-mode-on nil (setq skk-mode t skk-abbrev-mode nil skk-ascii-mode t skk-j-mode nil skk-zenkaku-mode nil skk-katakana nil skk-input-mode-string skk-ascii-mode-string) (skk-set-cursor-color skk-ascii-cursor-color) (force-mode-line-update))
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
686
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
687 (defsubst skk-zenkaku-mode-on nil (setq skk-mode t skk-abbrev-mode nil skk-ascii-mode nil skk-j-mode nil skk-zenkaku-mode t skk-katakana nil skk-input-mode-string skk-zenkaku-mode-string) (skk-set-cursor-color skk-zenkaku-cursor-color) (force-mode-line-update))
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
688
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
689 (defsubst skk-abbrev-mode-on nil (setq skk-mode t skk-abbrev-mode t skk-ascii-mode nil skk-j-mode nil skk-zenkaku-mode nil skk-katakana nil skk-input-mode-string skk-abbrev-mode-string) (skk-set-cursor-color skk-abbrev-cursor-color) (force-mode-line-update))
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
690
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
691 (defsubst skk-in-minibuffer-p nil (window-minibuffer-p (selected-window)))
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
692
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
693 (defsubst skk-insert-prefix (&optional char) (if skk-echo (let ((buffer-undo-list t)) (insert (or char skk-prefix)))))
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
694
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
695 (defsubst skk-erase-prefix nil (if skk-echo (let ((buffer-undo-list t)) (delete-region skk-kana-start-point (point)))))
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
696
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
697 (defsubst skk-numeric-p nil (and skk-use-numeric-conversion (require 'skk-num) skk-num-list))
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
698
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
699 (autoload 'skk-mode "skk" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
700 $BF|K\8lF~NO%b!<%I!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
701 $B%^%$%J!<%b!<%I$N0l<o$G!"%*%j%8%J%k$N%b!<%I$K$O1F6A$rM?$($J$$!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
702 $BIi$N0z?t$rM?$($k$H(B SKK $B%b!<%I$+$iH4$1$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
703
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
704 An input mode for Japanese, converting romanized phonetic strings to kanji.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
705
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
706 A minor mode, it should not affect the use of any major mode or
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
707 orthogonal minor modes.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
708
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
709 In the initial SKK mode, hiragana submode, the mode line indicator is
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
710 $B!V$+$J!W(B. Lowercase romaji entry is automatically converted to
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
711 hiragana where possible. The lowercase characters `q' and `l' change
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
712 submodes of SKK, and `x' is used as a prefix indicating a small kana.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
713
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
714 `q' is used to toggle between hiragana and katakana (mode line
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
715 indicator $B!V%+%J!W(B) entry submodes.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
716
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
717 `l' is used to enter ASCII submode (mode line indicator \"SKK\").
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
718 Uppercase `L' enters zenkaku (wide) ASCII submode (mode line indicator
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
719 $B!VA41Q!W(B). `
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
720 ' returns to hiragana submode from either ASCII submode.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
721
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
722 Kanji conversion is complex, but the basic principle is that the user
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
723 signals the appropriate stem to be matched against dictionary keys by
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
724 the use of uppercase letters. Because SKK does not use grammatical
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
725 information, both the beginning and the end of the stem must be marked.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
726
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
727 For non-inflected words (eg, nouns) consisting entirely of kanji, the
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
728 simplest way to invoke conversion is to enter the reading of the kanji,
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
729 the first character only in uppercase. A leading $B!V"&!W(B indicates that
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
730 kanji conversion is in progress. After entering the reading, press
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
731 space. This invokes dictionary lookup, and the hiragana reading will be
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
732 redisplayed in kanji as the first candidate. Pressing space again gives
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
733 the next candidate. Further presses of space produce further candidates,
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
734 as well as a list of the next few candidates in the minibuffer. Eg,
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
735 \"Benri\" => $B!V"&$Y$s$j!W(B, and pressing space produces $B!V"'JXMx!W(B (the solid
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
736 triangle indicates that conversion is in progress). Backspace steps
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
737 through the candidate list in reverse.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
738
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
739 A candidate can be accepted by pressing `
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
740 ', or by entering a
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
741 self-inserting character. (Unlike other common Japanese input methods,
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
742 RET not only accepts the current candidate, but also inserts a line
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
743 break.)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
744
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
745 Inflected words (verbs and adjectives), like non-inflected words, begin
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
746 entry with a capital letter. However, for these words the end of the
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
747 kanji string is signaled by capitalizing the next mora. Eg, \"TuyoI\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
748 => $B!V"'6/$$!W(B. If no candidate is available at that point, the inflection
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
749 point will be indicated with an asterisk \"*\", and trailing characters
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
750 will be displayed until a candidate is recognized. It will be
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
751 immediately displayed (pressing space is not necessary). Space and
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
752 backspace are used to step forward and backward through the list of
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
753 candidates.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
754
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
755 For more information, see the `skk' topic in Info. (Japanese only.)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
756
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
757 A tutorial is available in Japanese or English via \"M-x skk-tutorial\".
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
758 Use a prefix argument to be prompted for the language. The default is
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
759 system-dependent.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
760 " t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
761
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
762 (autoload 'skk-auto-fill-mode "skk" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
763 $BF|K\8lF~NO%b!<%I!#<+F0@^$jJV$75!G=IU$-!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
764 $B%^%$%J!<%b!<%I$N0l<o$G!"%*%j%8%J%k$N%b!<%I$K$O1F6A$rM?$($J$$!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
765 $B@5$N0z?t$rM?$($k$H!"6/@)E*$K(B auto-fill-mode $B5Z$S(B SKK $B%b!<%I$KF~$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
766 $BIi$N0z?t$rM?$($k$H(B auto-fill-mode $B5Z$S(B SKK $B%b!<%I$+$iH4$1$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
767
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
768 (autoload 'skk-emulate-original-map "skk" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
769
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
770 (autoload 'skk-get-current-candidate "skk" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
771
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
772 (autoload 'skk-previous-candidate "skk" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
773 $B"'%b!<%I$G$"$l$P!"0l$DA0$N8uJd$rI=<($9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
774 $B"'%b!<%I0J30$G$O%+%l%s%H%P%C%U%!$K(B \"x\" $B$rA^F~$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
775 $B3NDj<-=q$K$h$k3NDj$ND>8e$K8F$V$H3NDj$,%"%s%I%%$5$l$F!"3NDjA0$N>uBV$G(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
776 skk-last-kakutei-henkan-key $B$,%+%l%s%H%P%C%U%!$KA^F~$5$l$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
777
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
778 (autoload 'skk-kakutei "skk" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
779 $B8=:_I=<($5$l$F$$$k8l$G3NDj$7!"<-=q$N99?7$r9T$&!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
780 $B%*%W%7%g%J%k0z?t$N(B WORD $B$rEO$9$H!"8=:_I=<($5$l$F$$$k8uJd$H$OL54X78$K(B WORD $B$G3N(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
781 $BDj$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
782
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
783 (autoload 'skk-start-henkan "skk" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
784 $B"&%b!<%I$G$OJQ49$r3+;O$9$k!#"'%b!<%I$G$O<!$N8uJd$rI=<($9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
785 $B$=$NB>$N%b!<%I$G$O!"%*%j%8%J%k$N%-!<3d$jIU$1$N%3%^%s%I$r%(%_%e%l!<%H$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
786
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
787 (autoload 'skk-save-jisyo "skk" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
788 SKK $B$N<-=q%P%C%U%!$r%;!<%V$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
789 $B%*%W%7%g%J%k0z?t$N(B QUIET $B$,(B non-nil $B$G$"$l$P!"<-=q%;!<%V;~$N%a%C%;!<%8$r=P$5$J(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
790 $B$$!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
791
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
792 (autoload 'skk-search "skk" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
793
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
794 (autoload 'skk-nunion "skk" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
795
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
796 (autoload 'skk-update-jisyo "skk" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
797
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
798 (autoload 'skk-jisx0208-to-ascii "skk" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
799
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
800 (autoload 'skk-middle-list "skk" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
801
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
802 (autoload 'skk-set-cursor-properly "skk" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
803
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
804 (autoload 'skk-change-cursor-when-ovwrt "skk" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
805
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
806 (autoload 'skk-make-face "skk" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
807
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
808 ;;;***
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
809
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
810 ;;;### (autoloads (skk-adjust-search-prog-list-for-auto-okuri skk-init-auto-okuri-variables skk-remove-common) "skk-auto" "skk/skk-auto.el")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
811
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
812 (skk-deflocalvar skk-henkan-in-minibuff-flag nil "$B%_%K%P%C%U%!$G<-=qEPO?$r9T$C$?$H$-$K$3$N%U%i%0$,N)$D!#(B\nskk-remove-common $B$G;2>H$5$l$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
813
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
814 (autoload 'skk-remove-common "skk-auto" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
815
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
816 (autoload 'skk-init-auto-okuri-variables "skk-auto" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
817
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
818 (autoload 'skk-adjust-search-prog-list-for-auto-okuri "skk-auto" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
819
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
820 ;;;***
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
821
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
822 ;;;### (autoloads (skk-previous-completion skk-completion skk-start-henkan-with-completion) "skk-comp" "skk/skk-comp.el")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
823
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
824 (autoload 'skk-start-henkan-with-completion "skk-comp" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
825 $B"&%b!<%I$GFI$_$NJd40$r9T$J$C$?8e!"JQ49$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
826 $B$=$l0J30$N%b!<%I$G$O%*%j%8%J%k$N%-!<%^%C%W$K3d$jIU$1$i$l$?%3%^%s%I$r%(%_%e%l!<(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
827 $B%H$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
828
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
829 (autoload 'skk-completion "skk-comp" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
830
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
831 (autoload 'skk-previous-completion "skk-comp" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
832
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
833 ;;;***
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
834
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
835 ;;;### (autoloads (skk-henkan-face-off-and-remove-itself skk-ignore-dic-word skk-times skk-minus skk-plus skk-calc skk-convert-gengo-to-ad skk-convert-ad-to-gengo skk-clock skk-today skk-date) "skk-gadget" "skk/skk-gadget.el")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
836
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
837 (defvar skk-date-ad nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
838 *Non-nil $B$G$"$l$P!"(Bskk-today, skk-clock $B$G@>NqI=<($9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
839 nil $B$G$"$l$P!"859fI=<($9$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
840
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
841 (defvar skk-number-style 1 "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
842 *nil $B$b$7$/$O(B 0 $B$G$"$l$P!"(Bskk-today, skk-clock $B$N?t;z$rH>3Q$GI=<($9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
843 t $B$b$7$/$O!"(B1 $B$G$"$l$P!"A43QI=<($9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
844 t, 0, 1 $B0J30$N(B non-nil $BCM$G$"$l$P!"4A?t;z$GI=<($9$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
845
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
846 (autoload 'skk-date "skk-gadget" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
847
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
848 (autoload 'skk-today "skk-gadget" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
849 $B%$%s%?%i%/%F%#%V$K5/F0$9$k$H8=:_$NF|;~$rF|K\8lI=5-$G%]%$%s%H$KA^F~$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
850 $B%*%W%7%g%J%k0z?t$N(B AND-TIME $B$r;XDj$9$k$H!"F|;~$K2C$(!";~4V$bA^F~$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
851 skk-date-ad $B$H(B skk-number-style $B$K$h$C$FI=<(J}K!$N%+%9%?%^%$%:$,2DG=!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
852
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
853 (autoload 'skk-clock "skk-gadget" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
854 $B%G%8%?%k;~7W$r%_%K%P%C%U%!$KI=<($9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
855 quit $B$9$k$H$=$N;~E@$NF|;~$r8uJd$H$7$FA^F~$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
856 quit $B$7$?$H$-$K5/F0$7$F$+$i$N7P2a;~4V$r%_%K%P%C%U%!$KI=<($9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
857 interactive $B$K5/F0$9$kB>!"(B\"clock /(skk-clock)/\" $B$J$I$N%(%s%H%j$r(B SKK $B$N<-=q(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
858 $B$K2C$(!"(B\"/clock\"+ SPC $B$GJQ49$9$k$3$H$K$h$C$F$b5/F02D!#(BC-g $B$G;_$^$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
859 $B<B9TJQ49$G5/F0$7$?>l9g$O!"(BC-g $B$7$?;~E@$N;~E@$NF|;~$rA^F~$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
860 $B%*%W%7%g%J%k0z?t$N(B KAKUTEI-WHEN-QUIT $B$,(B non-nil $B$G$"$l$P(B C-g $B$7$?$H$-$K3N(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
861 $BDj$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
862 $B%*%W%7%g%J%k0z?t$N(B TIME-SIGNAL $B$,(B non-nil $B$G$"$l$P!"(BNTT $B$N;~JsIw$K(B ding $B$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
863 $B$=$l$>$l!"(B\"clock /(skk-clock nil t)/\" $B$N$h$&$J%(%s%H%j$r<-=q$KA^F~$9$l$PNI$$!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
864 skk-date-ad $B$H(B skk-number-style $B$K$h$C$FI=<(J}K!$N%+%9%?%^%$%:$,2DG=!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
865
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
866 (autoload 'skk-convert-ad-to-gengo "skk-gadget" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
867
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
868 (autoload 'skk-convert-gengo-to-ad "skk-gadget" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
869
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
870 (autoload 'skk-calc "skk-gadget" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
871
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
872 (autoload 'skk-plus "skk-gadget" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
873
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
874 (autoload 'skk-minus "skk-gadget" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
875
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
876 (autoload 'skk-times "skk-gadget" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
877
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
878 (autoload 'skk-ignore-dic-word "skk-gadget" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
879
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
880 (autoload 'skk-henkan-face-off-and-remove-itself "skk-gadget" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
881
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
882 ;;;***
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
883
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
884 ;;;### (autoloads nil "skk-isearch" "skk/skk-isearch.el")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
885
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
886 (defvar skk-isearch-whitespace-regexp "\\(\\s \\|[ \n \^L]\\)*")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
887
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
888 ;;;***
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
889
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
890 ;;;### (autoloads (skk-romaji-message skk-romaji-region skk-hurigana-katakana-message skk-hurigana-katakana-region skk-hurigana-message skk-hurigana-region skk-gyakubiki-katakana-message skk-gyakubiki-katakana-region skk-gyakubiki-message skk-gyakubiki-region) "skk-kakasi" "skk/skk-kakasi.el")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
891
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
892 (autoload 'skk-gyakubiki-region "skk-kakasi" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
893 $B%j!<%8%g%s$N4A;z!"Aw$j2>L>$rA4$F$R$i$,$J$KJQ49$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
894 $B%*%W%7%g%J%k0z?t$N(B ALL $B$,(B non-nil $B$J$i$P!"J#?t$N8uJd$,$"$k>l9g$O!"(B\"{}\" $B$G$/(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
895 $B$/$C$FI=<($9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
896 $BNc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
897 $BCfEg(B -> {$B$J$+$7$^(B|$B$J$+$8$^(B}" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
898
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
899 (autoload 'skk-gyakubiki-message "skk-kakasi" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
900 $B%j!<%8%g%s$N4A;z!"Aw$j2>L>$rA4$F$R$i$,$J$KJQ498e!"%(%3!<$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
901 $B%*%W%7%g%J%k0z?t$N(B ALL $B$,(B non-nil $B$J$i$P!"J#?t$N8uJd$,$"$k>l9g$O!"(B\"{}\" $B$G$/(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
902 $B$/$C$FI=<($9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
903 $BNc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
904 $BCfEg(B -> {$B$J$+$7$^(B|$B$J$+$8$^(B}" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
905
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
906 (autoload 'skk-gyakubiki-katakana-region "skk-kakasi" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
907 $B%j!<%8%g%s$N4A;z!"Aw$j2>L>$rA4$F%+%?%+%J$KJQ49$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
908 $B%*%W%7%g%J%k0z?t$N(B ALL $B$,(B non-nil $B$J$i$P!"J#?t$N8uJd$,$"$k>l9g$O!"(B\"{}\" $B$G$/(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
909 $B$/$C$FI=<($9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
910 $BNc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
911 $BCfEg(B -> {$B%J%+%7%^(B|$B%J%+%8%^(B}" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
912
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
913 (autoload 'skk-gyakubiki-katakana-message "skk-kakasi" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
914 $B%j!<%8%g%s$N4A;z!"Aw$j2>L>$rA4$F%+%?%+%J$KJQ498e!"%(%3!<$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
915 $B%*%W%7%g%J%k0z?t$N(B ALL $B$,(B non-nil $B$J$i$P!"J#?t$N8uJd$,$"$k>l9g$O!"(B\"{}\" $B$G$/(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
916 $B$/$C$FI=<($9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
917 $BNc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
918 $BCfEg(B -> {$B%J%+%7%^(B|$B%J%+%8%^(B}" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
919
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
920 (autoload 'skk-hurigana-region "skk-kakasi" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
921 $B%j!<%8%g%s$N4A;z$KA4$F$U$j$,$J$rIU$1$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
922 $BNc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
923 \"$BJQ49A0$N4A;z$NOF$K(B\" -> \"$BJQ49A0(B[$B$X$s$+$s$^$((B]$B$N4A;z(B[$B$+$s$8(B]$B$NOF(B[$B$o$-(B]$B$K(B\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
924
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
925 $B%*%W%7%g%J%k0z?t$N(B ALL $B$,(B non-nil $B$J$i$P!"J#?t$N8uJd$,$"$k>l9g$O!"(B\"{}\" $B$G$/(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
926 $B$/$C$FI=<($9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
927 $BNc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
928 $BCfEg(B -> {$B$J$+$7$^(B|$B$J$+$8$^(B}" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
929
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
930 (autoload 'skk-hurigana-message "skk-kakasi" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
931 $B%j!<%8%g%s$N4A;z$KA4$F$U$j$,$J$rIU$1!"%(%3!<$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
932 $BNc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
933 \"$BJQ49A0$N4A;z$NOF$K(B\" -> \"$BJQ49A0(B[$B$X$s$+$s$^$((B]$B$N4A;z(B[$B$+$s$8(B]$B$NOF(B[$B$o$-(B]$B$K(B\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
934
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
935 $B%*%W%7%g%J%k0z?t$N(B ALL $B$,(B non-nil $B$J$i$P!"J#?t$N8uJd$,$"$k>l9g$O!"(B\"{}\" $B$G$/(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
936 $B$/$C$FI=<($9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
937 $BNc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
938 $BCfEg(B -> {$B$J$+$7$^(B|$B$J$+$8$^(B}" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
939
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
940 (autoload 'skk-hurigana-katakana-region "skk-kakasi" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
941 $B%j!<%8%g%s$N4A;z$KA4$F%U%j%,%J$rIU$1$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
942 $BNc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
943 \"$BJQ49A0$N4A;z$NOF$K(B\" -> \"$BJQ49A0(B[$B%X%s%+%s%^%((B]$B$N4A;z(B[$B%+%s%8(B]$B$NOF(B[$B%o%-(B]$B$K(B\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
944
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
945 $B%*%W%7%g%J%k0z?t$N(B ALL $B$,(B non-nil $B$J$i$P!"J#?t$N8uJd$,$"$k>l9g$O!"(B\"{}\" $B$G$/(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
946 $B$/$C$FI=<($9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
947 $BNc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
948 $BCfEg(B -> {$B%J%+%7%^(B|$B%J%+%8%^(B}" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
949
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
950 (autoload 'skk-hurigana-katakana-message "skk-kakasi" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
951 $B%j!<%8%g%s$N4A;z$KA4$F%U%j%,%J$rIU$1!"%(%3!<$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
952 $BNc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
953 \"$BJQ49A0$N4A;z$NOF$K(B\" -> \"$BJQ49A0(B[$B%X%s%+%s%^%((B]$B$N4A;z(B[$B%+%s%8(B]$B$NOF(B[$B%o%-(B]$B$K(B\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
954
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
955 $B%*%W%7%g%J%k0z?t$N(B ALL $B$,(B non-nil $B$J$i$P!"J#?t$N8uJd$,$"$k>l9g$O!"(B\"{}\" $B$G$/(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
956 $B$/$C$FI=<($9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
957 $BNc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
958 $BCfEg(B -> {$B%J%+%7%^(B|$B%J%+%8%^(B}" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
959
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
960 (autoload 'skk-romaji-region "skk-kakasi" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
961 $B%j!<%8%g%s$N4A;z!"$R$i$,$J!"%+%?%+%J!"A41QJ8;z$rA4$F%m!<%^;z$KJQ49$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
962 $BJQ49$K$O!"%X%\%s<0$rMQ$$$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
963 $BNc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
964 \"$B4A;z$+$J:.$8$jJ8$r%m!<%^;z$KJQ49(B\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
965 -> \" kan'zi kana ma ziri bun' woro-ma zi ni hen'kan' \"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
966
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
967 skk-romaji-*-by-hepburn $B$,(B nil $B$G$"$l$P!"%m!<%^;z$X$NJQ49MM<0$r71Na<0$KJQ99$9(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
968 $B$k!#Nc$($P!"(B\"$B$7(B\" $B$O%X%\%s<0$G$O(B \"shi\" $B$@$,!"71Na<0$G$O(B \"si\" $B$H$J$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
969
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
970 (autoload 'skk-romaji-message "skk-kakasi" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
971 $B%j!<%8%g%s$N4A;z!"$R$i$,$J!"%+%?%+%J!"A41QJ8;z$rA4$F%m!<%^;z$KJQ49$7!"%(%3!<$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
972 $BJQ49$K$O!"%X%\%s<0$rMQ$$$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
973 $BNc$($P!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
974 \"$B4A;z$+$J:.$8$jJ8$r%m!<%^;z$KJQ49(B\"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
975 -> \" kan'zi kana ma ziri bun' woro-ma zi ni hen'kan' \"
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
976
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
977 skk-romaji-*-by-hepburn $B$,(B nil $B$G$"$l$P!"%m!<%^;z$X$NJQ49MM<0$r71Na<0$KJQ99$9(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
978 $B$k!#Nc$($P!"(B\"$B$7(B\" $B$O%X%\%s<0$G$O(B \"shi\" $B$@$,!"71Na<0$G$O(B \"si\" $B$H$J$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
979
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
980 ;;;***
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
981
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
982 ;;;### (autoloads (skk-display-code-for-char-at-point skk-input-by-code-or-menu) "skk-kcode" "skk/skk-kcode.el")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
983
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
984 (autoload 'skk-input-by-code-or-menu "skk-kcode" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
985 7bit $B$b$7$/$O(B 8bit $B$b$7$/$O(B $B6hE@%3!<%I$KBP1~$9$k(B 2byte $BJ8;z$rA^F~$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
986
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
987 (autoload 'skk-display-code-for-char-at-point "skk-kcode" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
988 $B%]%$%s%H$K$"$kJ8;z$N(B EUC $B%3!<%I$H(B JIS $B%3!<%I$rI=<($9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
989
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
990 ;;;***
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
991
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
992 ;;;### (autoloads (skk-menu-use-color-cursor skk-menu-compare-jisyo-size-when-saving skk-menu-server-debug skk-menu-report-server-response skk-menu-numeric-conversion-float-num skk-menu-use-kakasi skk-menu-romaji-*-by-hepburn skk-menu-date-ad skk-menu-dabbrev-like-completion skk-menu-auto-henkan skk-menu-count-private-jisyo-entries-exactly skk-menu-japanese-message-and-error skk-menu-auto-insert-paren skk-menu-use-overlay skk-menu-use-numeric-conversion skk-menu-echo skk-menu-delete-okuri-when-quit skk-menu-convert-okurigana-into-katakana skk-menu-allow-spaces-newlines-and-tabs skk-menu-delete-implies-kakutei skk-menu-egg-like-newline skk-menu-kakutei-early skk-menu-auto-okuri-process skk-menu-henkan-strict-okuri-precedence skk-menu-henkan-okuri-strictly skk-menu-process-okuri-early skk-menu-save-modified-user-option) "skk-menu" "skk/skk-menu.el")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
993
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
994 (autoload 'skk-menu-save-modified-user-option "skk-menu" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
995
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
996 (autoload 'skk-menu-process-okuri-early "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
997 skk-process-okuri-early $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
998 $BN>N)$G$-$J$$%*%W%7%g%s$NCM$rD4@0$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
999
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1000 (autoload 'skk-menu-henkan-okuri-strictly "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1001 skk-henkan-okuri-strictly $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1002 $BN>N)$G$-$J$$%*%W%7%g%s$NCM$rD4@0$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1003
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1004 (autoload 'skk-menu-henkan-strict-okuri-precedence "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1005 skk-henkan-strict-okuri-precedence $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1006 $BN>N)$G$-$J$$%*%W%7%g%s$NCM$rD4@0$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1007
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1008 (autoload 'skk-menu-auto-okuri-process "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1009 skk-auto-okuri-process $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1010 $BN>N)$G$-$J$$%*%W%7%g%s$NCM$rD4@0$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1011
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1012 (autoload 'skk-menu-kakutei-early "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1013 skk-kakutei-early $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1014 $BN>N)$G$-$J$$%*%W%7%g%s$NCM$rD4@0$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1015
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1016 (autoload 'skk-menu-egg-like-newline "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1017 skk-egg-like-newline $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1018
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1019 (autoload 'skk-menu-delete-implies-kakutei "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1020 skk-delete-implies-kakutei $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1021
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1022 (autoload 'skk-menu-allow-spaces-newlines-and-tabs "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1023 skk-allow-spaces-newlines-and-tabs $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1024
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1025 (autoload 'skk-menu-convert-okurigana-into-katakana "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1026 skk-convert-okurigana-into-katakana $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1027
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1028 (autoload 'skk-menu-delete-okuri-when-quit "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1029 skk-delete-okuri-when-quit $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1030
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1031 (autoload 'skk-menu-echo "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1032 skk-echo $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1033
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1034 (autoload 'skk-menu-use-numeric-conversion "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1035 skk-use-numeric-conversion $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1036
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1037 (autoload 'skk-menu-use-overlay "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1038 skk-use-face $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1039
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1040 (autoload 'skk-menu-auto-insert-paren "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1041 skk-auto-insert-paren $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1042
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1043 (autoload 'skk-menu-japanese-message-and-error "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1044 skk-japanese-message-and-error $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1045
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1046 (autoload 'skk-menu-count-private-jisyo-entries-exactly "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1047 skk-count-private-jisyo-candidates-exactly $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1048
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1049 (autoload 'skk-menu-auto-henkan "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1050 skk-auto-start-henkan $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1051
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1052 (autoload 'skk-menu-dabbrev-like-completion "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1053 skk-dabbrev-like-completion $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1054
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1055 (autoload 'skk-menu-date-ad "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1056 skk-date-ad $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1057
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1058 (autoload 'skk-menu-romaji-*-by-hepburn "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1059 skk-romaji-*-by-hepburn $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1060
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1061 (autoload 'skk-menu-use-kakasi "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1062 skk-use-kakasi $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1063
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1064 (autoload 'skk-menu-numeric-conversion-float-num "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1065 skk-numeric-conversion-float-num $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1066
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1067 (autoload 'skk-menu-report-server-response "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1068 skk-report-server-response $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1069
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1070 (autoload 'skk-menu-server-debug "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1071 skk-server-debug $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1072
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1073 (autoload 'skk-menu-compare-jisyo-size-when-saving "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1074 skk-compare-jisyo-size-when-saving $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1075
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1076 (autoload 'skk-menu-use-color-cursor "skk-menu" "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1077 skk-use-color-cursor $B$r%9%$%C%A%*%s(B/$B%*%U$9$k!#(B" t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1078
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1079 ;;;***
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1080
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1081 ;;;### (autoloads (skk-num skk-update-jisyo-for-numerals skk-numeric-midasi-word skk-init-numeric-conversion-variables skk-adjust-numeric-henkan-data skk-uniq-numerals skk-numeric-convert*7 skk-numeric-convert skk-compute-numeric-henkan-key) "skk-num" "skk/skk-num.el")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1082
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1083 (defvar skk-num-type-list '((?0 . identity) (?1 . skk-zenkaku-num-str) (?2 . skk-kanji-num-str) (?3 . skk-kanji-num-str2) (?4 . skk-recompute-numerals) (?9 . skk-shogi-num-str)) "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1084 *$B?t;z$NJQ49$N$?$a$N!"%$%s%G%/%9$HJQ49$K;HMQ$9$k4X?t$H$N%I%C%H%Z%"$N%j%9%H!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1085 $B3FMWAG$O!"(B($B?t;z$N(B char-type . $B4X?tL>(B) $B$H$$$&9=@.$K$J$C$F$$$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1086 car $BItJ,$O!"Nc$($P!"8+=P$78l$,(B \"$BJ?@.(B#1$BG/(B\" $B$N$H$-!"(B# $B5-9f$ND>8e$KI=<($5$l$k?t(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1087 $B;z(B \"1\" $B$r(B char-type $B$GI=$o$7$?$b$N$rBeF~$9$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1088
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1089 (defvar skk-uniq-numerals (or (assq ?4 skk-num-type-list) (and (assq ?2 skk-num-type-list) (assq ?3 skk-num-type-list))) "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1090 *Non-nil $B$G$"$l$P!"0[$J$k?tCMI=8=$G$bJQ497k2L$,F1$8?tCM$r=EJ#$7$F=PNO$7$J$$!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1091
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1092 (skk-deflocalvar skk-num-list nil "skk-henkan-key $B$NCf$K4^$^$l$k?t;z$rI=$9J8;zNs$N%j%9%H!#(B\n$BNc$($P!"(B\"$B"&$X$$$;$$(B7$B$M$s(B10$B$,$D(B\" $B$NJQ49$r9T$&$H$-!"(Bskk-henkan-key $B$O(B\n\"$B$X$$$;$$(B7$B$M$s(B10$B$,$D(B\" $B$G$"$j!"(Bskk-num-list $B$O(B (\"7\" \"10\") $B$H$J$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1093
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1094 (skk-deflocalvar skk-recompute-numerals-key nil "#4 $B%?%$%W$N%-!<$K$h$j?tCM$N:F7W;;$r9T$J$C$?$H$-$N8!:w%-!<!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1095
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1096 (autoload 'skk-compute-numeric-henkan-key "skk-num" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1097
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1098 (autoload 'skk-numeric-convert "skk-num" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1099
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1100 (autoload 'skk-numeric-convert*7 "skk-num" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1101
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1102 (autoload 'skk-uniq-numerals "skk-num" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1103
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1104 (autoload 'skk-adjust-numeric-henkan-data "skk-num" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1105
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1106 (autoload 'skk-init-numeric-conversion-variables "skk-num" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1107
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1108 (autoload 'skk-numeric-midasi-word "skk-num" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1109
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1110 (autoload 'skk-update-jisyo-for-numerals "skk-num" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1111
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1112 (autoload 'skk-num "skk-num" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1113
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1114 ;;;***
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1115
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1116 ;;;### (autoloads (skk-adjust-search-prog-list-for-server-search skk-server-version) "skk-server" "skk/skk-server.el")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1117
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1118 (defvar skk-server-host (getenv "SKKSERVER") "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1119 *SKK $B<-=q%5!<%P!<$rAv$i$;$F$$$k%[%9%HL>!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1120
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1121 (defvar skk-server-prog (getenv "SKKSERV") "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1122 *SKK $B<-=q%5!<%P!<%W%m%0%i%`L>!#%U%k%Q%9$G=q$/!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1123
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1124 (defvar skk-servers-list nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1125 *$B<-=q%5!<%P!<Kh$N>pJs%j%9%H!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1126 $BJ#?t$N%^%7!<%s$GF0$$$F$$$k%5!<%P$K%"%/%;%9$G$-$k>l9g$K$O!"0J2<$N$h$&$K!"%j%9%H(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1127 $B$N3FMWAG$K=g$K%[%9%HL>!"%U%k%Q%9$G$N(B SKK $B%5!<%P!<L>!"(BSKK $B%5!<%P!<$KEO$9<-=qL>!"(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1128 SKK $B%5!<%P!<$,;HMQ$9$k%]!<%HHV9f$r=q$-!"@_Dj$r$9$k$3$H$b$G$-$k!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1129
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1130 (setq skk-servers-list
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1131 '((\"mars\" \"/usr/local/soft/nemacs/etc/skkserv\" nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1132 (\"venus\" \"/usr/local/nemacs/etc/skkserv\" nil nil) ))
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1133
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1134 $B$3$N>l9g:G=i$K;XDj$7$?%5!<%P$K%"%/%;%9$G$-$J$/$J$k$H!"<+F0E*$K=g<!%j%9%H$K$"$k(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1135 $B;D$j$N%5!<%P$K%"%/%;%9$9$k$h$&$K$J$k!#$J$*(B SKK $B%5!<%P!<$KEO$9<-=q$*$h$S(B SKK $B%5!<(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1136 $B%P!<$,;HMQ$9$k%]!<%HHV9f$G!"(BSKK $B%5!<%P!<$r%3%s%Q%$%k;~$NCM$r;HMQ$9$k>l9g$O(B nil
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1137 $B$r;XDj$9$k!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1138
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1139 (autoload 'skk-server-version "skk-server" nil t nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1140
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1141 (autoload 'skk-adjust-search-prog-list-for-server-search "skk-server" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1142
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1143 ;;;***
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1144
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1145 ;;;### (autoloads (skk-assoc-tree) "skk-tree" "skk/skk-tree.el")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1146
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1147 (defvar skk-rom-kana-rule-tree nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1148 *skk-rom-kana-rule-list $B$NMWAG?t$,B?$/$J$C$?$H$-$K;HMQ$9$k%D%j!<!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1149 .emacs $B$K(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1150 (setq skk-rom-kana-rule-tree
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1151 (skk-compile-rule-list skk-rom-kana-rule-list))
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1152 $B$rDI2C$9$k(B.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1153
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1154 $B$3$N$^$^$G$O(B SKK $B$r5/F0$9$k$H$-$KKh2s(B \"skk-compile-rule-list\" $B$r7W;;$9(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1155 $B$k$3$H$K$J$k$N$G(B, $B$&$^$/$$$/$3$H$,$o$+$l$P(B,
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1156 (skk-compile-rule-list skk-rom-kana-rule-list)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1157 $B$NCM$rD>@\(B .emacs $B$K=q$$$F$*$/$H$h$$!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1158
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1159 (defvar skk-standard-rom-kana-rule-tree nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1160 *skk-standard-rom-kana-rule-list $B$NMWAG?t$,B?$/$J$C$?$H$-$K;HMQ$9$k%D%j!<!#(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1161 .emacs $B$K(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1162 (setq skk-standard-rom-kana-rule-tree
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1163 (skk-compile-rule-list skk-standard-rom-kana-rule-list))
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1164 $B$rDI2C$9$k(B.
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1165
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1166 $B$3$N$^$^$G$O(B SKK $B$r5/F0$9$k$H$-$KKh2s(B \"skk-compile-rule-list\" $B$r7W;;$9(B
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1167 $B$k$3$H$K$J$k$N$G(B, $B$&$^$/$$$/$3$H$,$o$+$l$P(B,
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1168 (skk-compile-rule-list skk-standard-rom-kana-rule-list)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1169 $B$NCM$rD>@\(B .emacs $B$K=q$$$F$*$/$H$h$$!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1170
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1171 (autoload 'skk-assoc-tree "skk-tree" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1172
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1173 ;;;***
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1174
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1175 ;;;### (autoloads (skk-vip-mode) "skk-vip" "skk/skk-vip.el")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1176
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1177 (autoload 'skk-vip-mode "skk-vip" nil nil nil)
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1178
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1179 ;;;***
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1180
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1181 ;;;### (autoloads nil "skk-viper" "skk/skk-viper.el")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1182
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1183 (defvar skk-viper-normalize-map-function nil "\
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1184 Viper $B$,(B minor-mode-map-alist $B$rD4@0$9$k$?$a$N4X?t!#(B")
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1185
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1186 ;;;***
262b8bb4a523 Import from CVS: tag r20-4b8
cvs
parents:
diff changeset
1187 (provide 'skk-vars)