38 |
Nothing special is needed to handle English.") |
Nothing special is needed to handle English.") |
39 |
)) |
)) |
40 |
|
|
41 |
|
;; Mostly because we can now... |
42 |
|
(define-coding-system 'ebcdic-us |
43 |
|
"US version of EBCDIC" |
44 |
|
:coding-type 'charset |
45 |
|
:charset-list '(ebcdic-us) |
46 |
|
:mnemonic ?*) |
47 |
|
|
48 |
|
(define-coding-system 'ebcdic-uk |
49 |
|
"UK version of EBCDIC" |
50 |
|
:coding-type 'charset |
51 |
|
:charset-list '(ebcdic-uk) |
52 |
|
:mnemonic ?*) |
53 |
|
|
54 |
;; Make "ASCII" an alias of "English" language environment. |
;; Make "ASCII" an alias of "English" language environment. |
55 |
(set-language-info-alist |
(set-language-info-alist |
56 |
"ASCII" (cdr (assoc "English" language-info-alist))) |
"ASCII" (cdr (assoc "English" language-info-alist))) |