From d3e52bd57a854920f21280d4fb3cf103eabc5409 Mon Sep 17 00:00:00 2001
From: Dave Love <fx@gnu.org>
Date: Fri, 17 May 2002 20:13:29 +0000
Subject: [PATCH] (ebcdic-us, ebcdic-uk): New coding systems.

---
 lisp/language/english.el | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/lisp/language/english.el b/lisp/language/english.el
index cbfd206c204..c7426b4e9cd 100644
--- a/lisp/language/english.el
+++ b/lisp/language/english.el
@@ -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)))
-- 
2.39.2