Mercurial > emacs

comparison lisp/language/tibetan.el @ 20159:dce0d588d203

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Give proper SAFE-CHARSET argument in each call of make-coding-system.
author Kenichi Handa <handa@m17n.org>
date Thu, 23 Oct 1997 12:03:41 +0000
parents 00b744016673
children 5f2c7f919bbf
comparison
equal deleted inserted replaced
20158:36eb3e583396 20159:dce0d588d203
90 90
91 (make-coding-system 91 (make-coding-system
92 'tibetan 2 ?Q 92 'tibetan 2 ?Q
93 "8-bit encoding for ASCII (MSB=0) and TIBETAN (MSB=1)" 93 "8-bit encoding for ASCII (MSB=0) and TIBETAN (MSB=1)"
94 '((ascii t) (tibetan t) nil nil 94 '((ascii t) (tibetan t) nil nil
95 nil ascii-eol)) 95 nil ascii-eol)
96 '(ascii tibetan))
96 97
97 (coding-system-put 'tibetan 'post-read-conversion 98 (coding-system-put 'tibetan 'post-read-conversion
98 'tibetan-post-read-conversion) 99 'tibetan-post-read-conversion)
99 (coding-system-put 'tibetan 'pre-write-conversion 100 (coding-system-put 'tibetan 'pre-write-conversion
100 'tibetan-pre-write-conversion) 101 'tibetan-pre-write-conversion)