# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 1021666476 0
# Node ID 2508448a287edb611ec5a4aba49cc5557943e8a3
# Parent  cb333bb243631738a0d89b16f5c3f214aa797335
(windows-1258, cp1258): New coding
systems.
(font-ccl-encoder-alist): Remove viscii, vscii.

diff -r cb333bb24363 -r 2508448a287e lisp/language/vietnamese.el
--- a/lisp/language/vietnamese.el	Fri May 17 20:14:02 2002 +0000
+++ b/lisp/language/vietnamese.el	Fri May 17 20:14:36 2002 +0000
@@ -2,8 +2,9 @@
 
 ;; Copyright (C) 1995 Electrotechnical Laboratory, JAPAN.
 ;; Licensed to the Free Software Foundation.
+;; Copyright (C) 2002 Free Software Foundation, Inc.
 
-;; Keywords: multilingual, Vietnamese
+;; Keywords: multilingual, Vietnamese, i18n
 
 ;; This file is part of GNU Emacs.
 
@@ -55,12 +56,6 @@
 
 (define-coding-system-alias 'viqr 'vietnamese-viqr)
 
-(setq font-ccl-encoder-alist
-      (cons '("viscii" . ccl-encode-viscii-font) font-ccl-encoder-alist))
-
-(setq font-ccl-encoder-alist
-      (cons '("vscii" . ccl-encode-vscii-font) font-ccl-encoder-alist))
-
 (set-language-info-alist
  "Vietnamese" `((charset viscii)
 		(coding-system vietnamese-viscii vietnamese-vscii
@@ -78,6 +73,14 @@
 If you prefer VSCII, please do: (prefer-coding-system 'vietnamese-vscii)")
 		))
 
+(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)
+
 (provide 'vietnamese)
 
 ;;; vietnamese.el ends here