12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970 |
- (set-language-info-alist
- "English" '((tutorial . "TUTORIAL")
- (charset ascii)
- (sample-text . "Hello!, Hi!, How are you?")
- (documentation . "\
- Nothing special is needed to handle English.")
- ))
- (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 ?*)
- (define-coding-system 'ibm1047
- "A version of EBCDIC used in OS/390 Unix"
- :coding-type 'charset
- :charset-list '(ibm1047)
- :mnemonic ?*)
- (define-coding-system-alias 'cp1047 'ibm1047)
- (set-language-info-alist
- "ASCII" (cdr (assoc "English" language-info-alist)))
|