diff options
| -rw-r--r-- | lisp/international/codepage.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/international/codepage.el b/lisp/international/codepage.el index 9d5e7872cb6..6f595c61b90 100644 --- a/lisp/international/codepage.el +++ b/lisp/international/codepage.el | |||
| @@ -116,7 +116,8 @@ variety is actually just an alias for the -unix variety)." | |||
| 116 | " characters using IBM codepage " coding-name) | 116 | " characters using IBM codepage " coding-name) |
| 117 | (cons ccl-decoder-unix ccl-encoder-unix) | 117 | (cons ccl-decoder-unix ccl-encoder-unix) |
| 118 | `((safe-charsets ascii ,iso-name) | 118 | `((safe-charsets ascii ,iso-name) |
| 119 | (valid-codes (0 . 255)))) | 119 | (valid-codes (0 . 255)) |
| 120 | (charset-origin-alist ,(list iso-name (symbol-name coding) encoder)))) | ||
| 120 | ;;; Make coding systems CODING-unix, CODING-dos, CODING-mac. | 121 | ;;; Make coding systems CODING-unix, CODING-dos, CODING-mac. |
| 121 | (make-subsidiary-coding-system coding) | 122 | (make-subsidiary-coding-system coding) |
| 122 | (put coding 'eol-type (vector (intern (format "%s-unix" coding)) | 123 | (put coding 'eol-type (vector (intern (format "%s-unix" coding)) |