Mercurial > emacs
view lisp/language/vietnamese.el @ 88821:690d527d1ad2
(access_keymap): Remove generic char code.
(push_key_description): Use CHARACTERP.
author | Dave Love <fx@gnu.org> |
---|---|
date | Wed, 03 Jul 2002 22:01:54 +0000 |
parents | e18cd612d3c4 |
children | 2f877ed80fa6 |
line wrap: on
line source
;;; vietnamese.el --- support for Vietnamese -*- coding: iso-2022-7bit; -*- ;; Copyright (C) 1995 Electrotechnical Laboratory, JAPAN. ;; Licensed to the Free Software Foundation. ;; Copyright (C) 2002 Free Software Foundation, Inc. ;; Keywords: multilingual, Vietnamese, i18n ;; This file is part of GNU Emacs. ;; GNU Emacs 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, or (at your option) ;; any later version. ;; GNU Emacs 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 GNU Emacs; see the file COPYING. If not, write to the ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, ;; Boston, MA 02111-1307, USA. ;;; Commentary: ;; For Vietnames, the character sets VISCII and VSCII are supported. ;;; Code: (define-coding-system 'vietnamese-viscii "8-bit encoding for Vietnamese VISCII 1.1 (MIME:VISCII)." :coding-type 'charset :mnemonic ?V :charset-list '(viscii) :mime-charset 'viscii) (define-coding-system-alias 'viscii 'vietnamese-viscii) (define-coding-system 'vietnamese-vscii "8-bit encoding for Vietnamese VSCII-1." :coding-type 'charset :mnemonic ?v :charset-list '(vscii)) (define-coding-system-alias 'vscii 'vietnamese-vscii) (define-coding-system 'vietnamese-viqr "Vietnamese latin transcription (VIQR)." :coding-type 'utf-8 :mnemonic ?q :charset-list '(ascii viscii) :post-read-conversion 'viqr-post-read-conversion :pre-write-conversion 'viqr-pre-write-conversion) (define-coding-system-alias 'viqr 'vietnamese-viqr) (set-language-info-alist "Vietnamese" `((charset viscii) (coding-system vietnamese-viscii vietnamese-vscii vietnamese-tcvn vietnamese-viqr windows-1258) (coding-priority vietnamese-viscii) (nonascii-translation . viscii) (input-method . "vietnamese-viqr") (unibyte-display . vietnamese-viscii) (features viet-util) (sample-text . "Vietnamese (Ti,1*(Bng Vi,1.(Bt) Ch,1`(Bo b,1U(Bn") (documentation . "\ For Vietnamese, Emacs can use encodings VISCII, VSCII, TCVN-5712, VIQR and windows-1258. VSCII is deprecated in favour of TCVN-5712. The current setting gives higher priority to the coding system VISCII than TCVN-5712. If you prefer TCVN-5712, please do: (prefer-coding-system 'vietnamese-tcvn). There are two Vietnamese input methods: VIQR and Telex; VIQR is the default setting."))) (define-coding-system 'windows-1258 "windows-1258 encoding for Vietnamese (MIME: WINDOWS-1258)" :coding-type 'charset :mnemonic ?* :charset-list '(windows-1258) :mime-charset 'windows-1258) (define-coding-system-alias 'cp1258 'windows-1258) (define-coding-system 'vietnamese-tcvn "8-bit encoding for Vietnamese TCVN-5712" :coding-type 'charset :mnemonic ?t :charset-list '(tcvn-5712)) (define-coding-system-alias 'tcvn 'vietnamese-tcvn) (provide 'vietnamese) ;;; vietnamese.el ends here