Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-21 12:27:33 +00:00
Code Issues Projects Releases Packages Wiki Activity

(cp-coding-system-for-codepage-1): Put

Browse source 
charset-origin-alist property to a coding system for the codepage.
This commit is contained in:
Kenichi Handa 1999-02-22 01:59:01 +00:00
parent 9b4b0c9ef9
commit bd72be60b4
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/international/codepage.el
View file

@ -116,7 +116,8 @@ variety is actually just an alias for the -unix variety)."
" characters using IBM codepage " coding-name)
(cons ccl-decoder-unix ccl-encoder-unix)
`((safe-charsets ascii ,iso-name)
(valid-codes (0 . 255))))
(valid-codes (0 . 255))
(charset-origin-alist ,(list iso-name (symbol-name coding) encoder))))
;;; Make coding systems CODING-unix, CODING-dos, CODING-mac.
(make-subsidiary-coding-system coding)
(put coding 'eol-type (vector (intern (format "%s-unix" coding))