[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/international/titdic-cnv.el
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/international/titdic-cnv.el |
Date: |
Fri, 04 Apr 2003 01:22:23 -0500 |
Index: emacs/lisp/international/titdic-cnv.el
diff -c emacs/lisp/international/titdic-cnv.el:1.35
emacs/lisp/international/titdic-cnv.el:1.36
*** emacs/lisp/international/titdic-cnv.el:1.35 Mon Dec 9 00:42:22 2002
--- emacs/lisp/international/titdic-cnv.el Tue Feb 4 08:09:38 2003
***************
*** 163,172 ****
first radical:
a b c d e f g h i j k l m n o p q r s t u v w x y z
! $APD(B $AZ"(B $AJ,(B $AX<(B $A;p(B $A?Z(B $A^P(B $Ac_(B
$AZ%(B $A\3(B $AXi(B $AD>(B $Alj(B $Ab;(B $ATB(B $Afy(B
$AJ/(B $AMu(B $A0K(B $AX/(B $AHU(B $AeA(B $Aak(B $AVq(B
$AR;(B $AHK(B
last radical:
a b c d e f g h i j k l m n o p q r s t u v w x y z
! $ASV(B $AI=(B $AMA(B $A56(B $AZb(B $A?Z(B $ARB(B $Aqb(B
$A4s(B $A6!(B $A[L(B $Ala(B $AJ.(B $A4u(B $AXg(B $ACE(B
$A=q(B $AX-(B $AE.(B $ARR(B $A`m(B $AP!(B $A3'(B $A3f(B
$A_.(B $A27(B
\\<quail-translation-docstring>")
--- 163,172 ----
first radical:
a b c d e f g h i j k l m n o p q r s t u v w x y z
! $APD(B $AZ"(B $AJ,(B $AX<(B $A;p(B $A?Z(B $A^P(B $Ac_(B
$AZ%(B $A\3(B $AXi(B $AD>(B $Alj(B $Ab;(B $ATB(B $Afy(B
$AJ/(B $AMu(B $A0K(B $AX/(B $AHU(B $AeA(B $Aak(B $AVq(B
$AR;(B $AHK(B
last radical:
a b c d e f g h i j k l m n o p q r s t u v w x y z
! $ASV(B $AI=(B $AMA(B $A56(B $AZb(B $A?Z(B $ARB(B $Aqb(B
$A4s(B $A6!(B $A[L(B $Ala(B $AJ.(B $A4u(B $AXg(B $ACE(B
$A=q(B $AX-(B $AE.(B $ARR(B $A`m(B $AP!(B $A3'(B $A3f(B
$A_.(B $A27(B
\\<quail-translation-docstring>")
***************
*** 331,337 ****
(princ (buffer-substring pos (point)))
(princ "\n")
(forward-line 1)))
!
(princ "\n;;; End of the header of original TIT dictionary.\n\n")
(princ ";;; Code:\n\n(require 'quail)\n\n")
--- 331,337 ----
(princ (buffer-substring pos (point)))
(princ "\n")
(forward-line 1)))
!
(princ "\n;;; End of the header of original TIT dictionary.\n\n")
(princ ";;; Code:\n\n(require 'quail)\n\n")
***************
*** 473,479 ****
(set-buffer-multibyte nil)
(let ((coding-system-for-read 'no-conversion))
(insert-file-contents (expand-file-name filename)))
!
;; Decode the buffer contents from the encoding specified by a
;; value of the key "ENCODE:".
(if (not (search-forward "\nBEGIN" nil t))
--- 473,479 ----
(set-buffer-multibyte nil)
(let ((coding-system-for-read 'no-conversion))
(insert-file-contents (expand-file-name filename)))
!
;; Decode the buffer contents from the encoding specified by a
;; value of the key "ENCODE:".
(if (not (search-forward "\nBEGIN" nil t))
***************
*** 563,569 ****
;; Alist of input method names and the corresponding information.
;; Each element has this form:
;; (INPUT-METHOD-NAME ;; Name of the input method.
! ;; INPUT-METHOD-TITLE ;; Title string of the input method
;; DICFILE ;; Name of the source dictionary file.
;; CODING ;; Coding system of the dictionary file.
;; QUAILFILE ;; Name of the Quail package file.
--- 563,569 ----
;; Alist of input method names and the corresponding information.
;; Each element has this form:
;; (INPUT-METHOD-NAME ;; Name of the input method.
! ;; INPUT-METHOD-TITLE ;; Title string of the input method
;; DICFILE ;; Name of the source dictionary file.
;; CODING ;; Coding system of the dictionary file.
;; QUAILFILE ;; Name of the Quail package file.
***************
*** 573,579 ****
(defvar quail-misc-package-ext-info
'(("chinese-b5-tsangchi" "$(06A(BB"
! "cangjie-table.b5" big5 "tsang-b5.el"
tsang-b5-converter
"\
;; # Copyright 2001 Christian Wittern <address@hidden>
--- 573,579 ----
(defvar quail-misc-package-ext-info
'(("chinese-b5-tsangchi" "$(06A(BB"
! "cangjie-table.b5" big5 "tsang-b5.el"
tsang-b5-converter
"\
;; # Copyright 2001 Christian Wittern <address@hidden>
***************
*** 583,589 ****
;; # this notice is preserved.")
("chinese-b5-quick" "$(0X|(BB"
! "cangjie-table.b5" big5 "quick-b5.el"
quick-b5-converter
"\
;; # Copyright 2001 Christian Wittern <address@hidden>
--- 583,589 ----
;; # this notice is preserved.")
("chinese-b5-quick" "$(0X|(BB"
! "cangjie-table.b5" big5 "quick-b5.el"
quick-b5-converter
"\
;; # Copyright 2001 Christian Wittern <address@hidden>
***************
*** 624,644 ****
;;
;;
;; Copyright (C) 1999, Rui He, address@hidden
! ;;
! ;;
;; CCE(Console Chinese Environment) 0.32
! ;;
! ;; CCE is free software; you can redistribute it and/or modify it under the
! ;; terms of the GNU General Public License as published by the Free Software
! ;; Foundation; either version 1, or (at your option) any later version.
! ;;
! ;; CCE is distributed in the hope that it will be useful, but WITHOUT ANY
! ;; WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
! ;; FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
! ;; details.
! ;;
;; You should have received a copy of the GNU General Public License along
with
! ;; CCE; see the file COPYING. If not, write to the Free Software Foundation,
;; 675 Mass Ave, Cambridge, MA 02139, USA.")
("chinese-ziranma" "$AWTH;(B"
--- 624,644 ----
;;
;;
;; Copyright (C) 1999, Rui He, address@hidden
! ;;
! ;;
;; CCE(Console Chinese Environment) 0.32
! ;;
! ;; CCE is free software; you can redistribute it and/or modify it under the
! ;; terms of the GNU General Public License as published by the Free Software
! ;; Foundation; either version 1, or (at your option) any later version.
! ;;
! ;; CCE is distributed in the hope that it will be useful, but WITHOUT ANY
! ;; WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
! ;; FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
! ;; details.
! ;;
;; You should have received a copy of the GNU General Public License along
with
! ;; CCE; see the file COPYING. If not, write to the Free Software Foundation,
;; 675 Mass Ave, Cambridge, MA 02139, USA.")
("chinese-ziranma" "$AWTH;(B"
***************
*** 653,673 ****
;;
;;
;; Copyright (C) 1999, Rui He, address@hidden
! ;;
! ;;
;; CCE(Console Chinese Environment) 0.32
! ;;
! ;; CCE is free software; you can redistribute it and/or modify it under the
! ;; terms of the GNU General Public License as published by the Free Software
! ;; Foundation; either version 1, or (at your option) any later version.
! ;;
! ;; CCE is distributed in the hope that it will be useful, but WITHOUT ANY
! ;; WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
! ;; FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
! ;; details.
! ;;
;; You should have received a copy of the GNU General Public License along
with
! ;; CCE; see the file COPYING. If not, write to the Free Software Foundation,
;; 675 Mass Ave, Cambridge, MA 02139, USA.")
("chinese-ctlau" "$AAuTA(B"
--- 653,673 ----
;;
;;
;; Copyright (C) 1999, Rui He, address@hidden
! ;;
! ;;
;; CCE(Console Chinese Environment) 0.32
! ;;
! ;; CCE is free software; you can redistribute it and/or modify it under the
! ;; terms of the GNU General Public License as published by the Free Software
! ;; Foundation; either version 1, or (at your option) any later version.
! ;;
! ;; CCE is distributed in the hope that it will be useful, but WITHOUT ANY
! ;; WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
! ;; FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
! ;; details.
! ;;
;; You should have received a copy of the GNU General Public License along
with
! ;; CCE; see the file COPYING. If not, write to the Free Software Foundation,
;; 675 Mass Ave, Cambridge, MA 02139, USA.")
("chinese-ctlau" "$AAuTA(B"
***************
*** 681,697 ****
;; It contains the following copyright notice:
;;
;; # Copyright (C) 1988-2001 Fung Fung Lee (address@hidden)
! ;; #
;; # This program is free software; you can redistribute it and/or
;; # modify it under the terms of the GNU General Public License
;; # as published by the Free Software Foundation; either version 2
;; # of the License, or any later version.
! ;; #
;; # This program is distributed in the hope that it will be useful,
;; # but WITHOUT ANY WARRANTY; without even the implied warranty of
;; # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; # GNU General Public License for more details.
! ;; #
;; # You should have received a copy of the GNU General Public License
;; # along with this program; if not, write to the Free Software Foundation,
;; # Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.")
--- 681,697 ----
;; It contains the following copyright notice:
;;
;; # Copyright (C) 1988-2001 Fung Fung Lee (address@hidden)
! ;; #
;; # This program is free software; you can redistribute it and/or
;; # modify it under the terms of the GNU General Public License
;; # as published by the Free Software Foundation; either version 2
;; # of the License, or any later version.
! ;; #
;; # This program is distributed in the hope that it will be useful,
;; # but WITHOUT ANY WARRANTY; without even the implied warranty of
;; # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; # GNU General Public License for more details.
! ;; #
;; # You should have received a copy of the GNU General Public License
;; # along with this program; if not, write to the Free Software Foundation,
;; # Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.")
***************
*** 707,723 ****
;; It contains the following copyright notice:
;;
;; # Copyright (C) 1988-2001 Fung Fung Lee (address@hidden)
! ;; #
;; # This program is free software; you can redistribute it and/or
;; # modify it under the terms of the GNU General Public License
;; # as published by the Free Software Foundation; either version 2
;; # of the License, or any later version.
! ;; #
;; # This program is distributed in the hope that it will be useful,
;; # but WITHOUT ANY WARRANTY; without even the implied warranty of
;; # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; # GNU General Public License for more details.
! ;; #
;; # You should have received a copy of the GNU General Public License
;; # along with this program; if not, write to the Free Software Foundation,
;; # Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.")
--- 707,723 ----
;; It contains the following copyright notice:
;;
;; # Copyright (C) 1988-2001 Fung Fung Lee (address@hidden)
! ;; #
;; # This program is free software; you can redistribute it and/or
;; # modify it under the terms of the GNU General Public License
;; # as published by the Free Software Foundation; either version 2
;; # of the License, or any later version.
! ;; #
;; # This program is distributed in the hope that it will be useful,
;; # but WITHOUT ANY WARRANTY; without even the implied warranty of
;; # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; # GNU General Public License for more details.
! ;; #
;; # You should have received a copy of the GNU General Public License
;; # along with this program; if not, write to the Free Software Foundation,
;; # Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.")
***************
*** 745,751 ****
[Q $(0'D(B] [W $(0(q(B] [E $(0'V(B] [R $(0&H(B] [T $(0'>(B] [Y
$(0&4(B] [U $(0&U(B] [I $(0'B(B] [O $(0&*(B] [P $(0'A(B]
[A $(0'K(B] [S $(0&T(B] [D $(0'N(B] [F $(0'W(B] [G $(0&I(B] [H
$(0*M(B] [J $(0&3(B] [L $(0&d(B]
!
[Z ] [X $(0[E(B] [C $(01[(B] [V $(0&M(B] [B $(0'M(B] [N
$(0&_(B] [M $(0&"(B]
\\\\<quail-translation-docstring>\"\n"
--- 745,751 ----
[Q $(0'D(B] [W $(0(q(B] [E $(0'V(B] [R $(0&H(B] [T $(0'>(B] [Y
$(0&4(B] [U $(0&U(B] [I $(0'B(B] [O $(0&*(B] [P $(0'A(B]
[A $(0'K(B] [S $(0&T(B] [D $(0'N(B] [F $(0'W(B] [G $(0&I(B] [H
$(0*M(B] [J $(0&3(B] [L $(0&d(B]
!
[Z ] [X $(0[E(B] [C $(01[(B] [V $(0&M(B] [B $(0'M(B] [N
$(0&_(B] [M $(0&"(B]
\\\\<quail-translation-docstring>\"\n"
***************
*** 757,764 ****
[Q $(GEC(B] [W $(GFp(B] [E $(GEU(B] [R $(GDG(B] [T $(GE=(B] [Y
$(GD3(B] [U $(GDT(B] [I $(GEA(B] [O $(GD)(B] [P $(address@hidden(B]
[A $(GEJ(B] [S $(GDS(B] [D $(GEM(B] [F $(GEV(B] [G $(GDH(B] [H
$(GHL(B] [J $(GD2(B] [L $(GDc(B]
!
! [Z ] [X $(GyE(B] [C $(GOZ(B] [V $(GDL(B] [B $(GEL(B] [N
$(GD^(B] [M $(GD!(B]
\\\\<quail-translation-docstring>\"\n"
fulltitle fulltitle)))
--- 757,764 ----
[Q $(GEC(B] [W $(GFp(B] [E $(GEU(B] [R $(GDG(B] [T $(GE=(B] [Y
$(GD3(B] [U $(GDT(B] [I $(GEA(B] [O $(GD)(B] [P $(address@hidden(B]
[A $(GEJ(B] [S $(GDS(B] [D $(GEM(B] [F $(GEV(B] [G $(GDH(B] [H
$(GHL(B] [J $(GD2(B] [L $(GDc(B]
!
! [Z ] [X $(GyE(B] [C $(GOZ(B] [V $(GDL(B] [B $(GEL(B] [N
$(GD^(B] [M $(GD!(B]
\\\\<quail-translation-docstring>\"\n"
fulltitle fulltitle)))
***************
*** 1096,1102 ****
the Cantonese romanization of the respective radical ($(0?f5}(B)."))
(defun miscdic-convert (filename &optional dirname)
! "Convert a dictionary file FILENAME into a Quail package.
Optional argument DIRNAME if specified is the directory name under which
the generated Quail package is saved."
(interactive "FInput method dictionary file: ")
--- 1096,1102 ----
the Cantonese romanization of the respective radical ($(0?f5}(B)."))
(defun miscdic-convert (filename &optional dirname)
! "Convert a dictionary file FILENAME into a Quail package.
Optional argument DIRNAME if specified is the directory name under which
the generated Quail package is saved."
(interactive "FInput method dictionary file: ")
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/international/titdic-cnv.el,
Miles Bader <=