71 lines
2.5 KiB
Plaintext
71 lines
2.5 KiB
Plaintext
|
*** yc.el.orig Sun Dec 5 15:50:23 1999
|
|||
|
--- yc.el Sun Dec 5 16:08:09 1999
|
|||
|
***************
|
|||
|
*** 251,257 ****
|
|||
|
|
|||
|
(require 'cl)
|
|||
|
|
|||
|
! (defconst yc-canna-lib-path "/usr/lib/canna/dic/";"/usr/local/canna/lib/dic/"
|
|||
|
"$B$+$s$J$N<-=q%Q%9$r@_Dj$9$k(B")
|
|||
|
(defconst yc-select-count 2 ; $B0lMw%b!<%I$K$J$k7+$jJV$7?t(B
|
|||
|
"$B0lMw%b!<%I$K$J$k7+JV$7?t$r@_Dj$9$k!#%G%U%)%k%H$O(B3$B2s!#(B
|
|||
|
--- 251,257 ----
|
|||
|
|
|||
|
(require 'cl)
|
|||
|
|
|||
|
! (defconst yc-canna-lib-path "/usr/local/lib/canna/dic/"
|
|||
|
"$B$+$s$J$N<-=q%Q%9$r@_Dj$9$k(B")
|
|||
|
(defconst yc-select-count 2 ; $B0lMw%b!<%I$K$J$k7+$jJV$7?t(B
|
|||
|
"$B0lMw%b!<%I$K$J$k7+JV$7?t$r@_Dj$9$k!#%G%U%)%k%H$O(B3$B2s!#(B
|
|||
|
***************
|
|||
|
*** 655,661 ****
|
|||
|
(defvar yc-user-dic-list nil)
|
|||
|
(defvar yc-default-bushu-dic-list '("bushu"))
|
|||
|
(defvar yc-bushu-dic-list nil)
|
|||
|
! (defvar yc-rH-conv-dic "/usr/local/canna/lib/dic/default.cbp")
|
|||
|
(defvar yc-default-rH-table
|
|||
|
'(("~" "$B!1(B" "") ("}" "$B!Y(B" "") ("|" "$B!C(B" "") ("{" "$B!X(B" "") ("zz" "$B$C(B" "z")
|
|||
|
("zyu" "$B$8$e(B" "") ("zyo" "$B$8$g(B" "") ("zyi" "$B$8$#(B" "") ("zye" "$B$8$'(B" "")
|
|||
|
--- 655,661 ----
|
|||
|
(defvar yc-user-dic-list nil)
|
|||
|
(defvar yc-default-bushu-dic-list '("bushu"))
|
|||
|
(defvar yc-bushu-dic-list nil)
|
|||
|
! (defvar yc-rH-conv-dic (concat (file-name-as-directory yc-canna-lib-path) "default.kp"))
|
|||
|
(defvar yc-default-rH-table
|
|||
|
'(("~" "$B!1(B" "") ("}" "$B!Y(B" "") ("|" "$B!C(B" "") ("{" "$B!X(B" "") ("zz" "$B$C(B" "z")
|
|||
|
("zyu" "$B$8$e(B" "") ("zyo" "$B$8$g(B" "") ("zyi" "$B$8$#(B" "") ("zye" "$B$8$'(B" "")
|
|||
|
***************
|
|||
|
*** 1603,1609 ****
|
|||
|
(defun yc-read-string-from-file (file)
|
|||
|
(let* (;; emacs-20.x
|
|||
|
(auto-coding-alist
|
|||
|
! (cons '("\\.cbp" . japanese-iso-8bit)
|
|||
|
(and (boundp 'auto-coding-alist)
|
|||
|
auto-coding-alist)))
|
|||
|
(auto-coding-alist
|
|||
|
--- 1603,1609 ----
|
|||
|
(defun yc-read-string-from-file (file)
|
|||
|
(let* (;; emacs-20.x
|
|||
|
(auto-coding-alist
|
|||
|
! (cons '("\\.kp" . japanese-iso-8bit)
|
|||
|
(and (boundp 'auto-coding-alist)
|
|||
|
auto-coding-alist)))
|
|||
|
(auto-coding-alist
|
|||
|
***************
|
|||
|
*** 1613,1619 ****
|
|||
|
|
|||
|
;; XEmacs-20.x
|
|||
|
(file-coding-system-alist
|
|||
|
! (cons '("\\.cbp" . euc-jp)
|
|||
|
(and (boundp 'file-coding-system-alist)
|
|||
|
file-coding-system-alist)))
|
|||
|
(file-coding-system-alist
|
|||
|
--- 1613,1619 ----
|
|||
|
|
|||
|
;; XEmacs-20.x
|
|||
|
(file-coding-system-alist
|
|||
|
! (cons '("\\.kp" . euc-jp)
|
|||
|
(and (boundp 'file-coding-system-alist)
|
|||
|
file-coding-system-alist)))
|
|||
|
(file-coding-system-alist
|