Mercurial > emacs
comparison leim/quail/hangul.el @ 38453:519983161a46
Some fixes to follow lisp coding conventions and typo fixes.
author | Pavel Janík <Pavel@Janik.cz> |
---|---|
date | Mon, 16 Jul 2001 20:22:24 +0000 |
parents | f6fd6bf625a7 |
children | 890f548046c1 |
comparison
equal
deleted
inserted
replaced
38452:e1e6c0c30e69 | 38453:519983161a46 |
---|---|
1 ;;; quail/hangul.el -- Quail package for inputting Korean Hangul characters | 1 ;;; hangul.el --- Quail package for inputting Korean Hangul characters |
2 | 2 |
3 ;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN. | 3 ;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN. |
4 ;; Licensed to the Free Software Foundation. | 4 ;; Licensed to the Free Software Foundation. |
5 | 5 |
6 ;; Keywords: multilingual, input method, Korean, Hangul | 6 ;; Keywords: multilingual, input method, Korean, Hangul |
19 | 19 |
20 ;; You should have received a copy of the GNU General Public License | 20 ;; You should have received a copy of the GNU General Public License |
21 ;; along with GNU Emacs; see the file COPYING. If not, write to the | 21 ;; along with GNU Emacs; see the file COPYING. If not, write to the |
22 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, | 22 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, |
23 ;; Boston, MA 02111-1307, USA. | 23 ;; Boston, MA 02111-1307, USA. |
24 | |
25 ;;; Commentary: | |
24 | 26 |
25 ;;; Code: | 27 ;;; Code: |
26 | 28 |
27 (require 'quail) | 29 (require 'quail) |
28 (require 'korea-util) | 30 (require 'korea-util) |
2603 ("STel" ?$(C"e(B) | 2605 ("STel" ?$(C"e(B) |
2604 ("SC" ?$(C!I(B) | 2606 ("SC" ?$(C!I(B) |
2605 ("SA" ?$(C!J(B) | 2607 ("SA" ?$(C!J(B) |
2606 ("SC/" ?$(C!K(B) | 2608 ("SC/" ?$(C!K(B) |
2607 ("SF" ?$(C"5(B)) | 2609 ("SF" ?$(C"5(B)) |
2610 | |
2611 ;;; hangul.el ends here |