Mercurial > emacs

changeset 88556:c1d67f50c8f0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(ebcdic-us, ebcdic-uk): New coding systems.
author Dave Love <fx@gnu.org>
date Fri, 17 May 2002 20:13:29 +0000
parents e52f0de0d5d1
children 601020f7bce8
files lisp/language/english.el
diffstat 1 files changed, 13 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/language/english.el	Fri May 17 20:11:06 2002 +0000
+++ b/lisp/language/english.el	Fri May 17 20:13:29 2002 +0000
@@ -38,6 +38,19 @@
 Nothing special is needed to handle English.")
 	     ))
 
+;; Mostly because we can now...
+(define-coding-system 'ebcdic-us
+  "US version of EBCDIC"
+  :coding-type 'charset
+  :charset-list '(ebcdic-us)
+  :mnemonic ?*)
+
+(define-coding-system 'ebcdic-uk
+  "UK version of EBCDIC"
+  :coding-type 'charset
+  :charset-list '(ebcdic-uk)
+  :mnemonic ?*)
+
 ;; Make "ASCII" an alias of "English" language environment.
 (set-language-info-alist
  "ASCII" (cdr (assoc "English" language-info-alist)))