465 |
(define-coding-system-alias |
(define-coding-system-alias |
466 |
'us-ascii 'iso-safe) |
'us-ascii 'iso-safe) |
467 |
|
|
468 |
|
(make-coding-system |
469 |
|
'iso-latin-1 2 ?1 |
470 |
|
"ISO 2022 based 8-bit encoding for Latin-1 (MIME:ISO-8859-1)." |
471 |
|
'(ascii latin-iso8859-1 nil nil |
472 |
|
nil nil nil nil nil nil nil nil nil nil nil t t) |
473 |
|
'((safe-charsets ascii latin-iso8859-1) |
474 |
|
(mime-charset . iso-8859-1))) |
475 |
|
|
476 |
|
(define-coding-system-alias 'iso-8859-1 'iso-latin-1) |
477 |
|
(define-coding-system-alias 'latin-1 'iso-latin-1) |
478 |
|
|
479 |
;; Use iso-safe for terminal output if some other coding system is not |
;; Use iso-safe for terminal output if some other coding system is not |
480 |
;; specified explicitly. |
;; specified explicitly. |
481 |
(set-safe-terminal-coding-system-internal 'iso-safe) |
(set-safe-terminal-coding-system-internal 'iso-safe) |