Mercurial > hg > xemacs-beta

diff lisp/apel/emu-x20.el @ 185:3d6bfa290dbd r20-3b19

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b19
author cvs
date Mon, 13 Aug 2007 09:55:28 +0200
parents 3bb7ccffb0c0
children
line wrap: on
line diff
--- a/lisp/apel/emu-x20.el	Mon Aug 13 09:54:24 2007 +0200
+++ b/lisp/apel/emu-x20.el	Mon Aug 13 09:55:28 2007 +0200
@@ -3,7 +3,7 @@
 ;; Copyright (C) 1994,1995,1996,1997 MORIOKA Tomohiko
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Version: $Id: emu-x20.el,v 1.2 1997/06/11 19:25:42 steve Exp $
+;; Version: $Id: emu-x20.el,v 1.3 1997/09/03 02:55:28 steve Exp $
 ;; Keywords: emulation, compatibility, Mule, XEmacs
 
 ;; This file is part of XEmacs.
@@ -110,9 +110,9 @@
 (defvar default-mime-charset 'x-ctext)
 
 (defvar mime-charset-coding-system-alist
-  '((x-ctext		. ctext)
-    (iso-2022-jp-2	. iso-2022-ss2-7)
-    ))
+  '((x-ctext . ctext))
+  "Alist MIME CHARSET vs CODING-SYSTEM.
+MIME CHARSET and CODING-SYSTEM must be symbol.")
 
 (defun mime-charset-to-coding-system (charset)
   "Return coding-system by MIME charset."