Mercurial > hg > xemacs-beta

comparison lisp/mule/mule-coding.el @ 367:a4f53d9b3154 r21-1-13

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-1-13
author cvs
date Mon, 13 Aug 2007 11:01:07 +0200
parents 4f79e16b1112
children
comparison
equal deleted inserted replaced
366:83d76f480a59 367:a4f53d9b3154
174 174
175 ;; initialize the coding categories to something semi-reasonable 175 ;; initialize the coding categories to something semi-reasonable
176 ;; so that the remaining Lisp files can contain extended characters. 176 ;; so that the remaining Lisp files can contain extended characters.
177 ;; (They will be in ISO-7 format) 177 ;; (They will be in ISO-7 format)
178 178
179 (set-coding-priority-list '(iso-8-2 iso-8-designate iso-8-1 179 (set-coding-priority-list '(iso-8-2
180 iso-7 iso-lock-shift no-conversion)) 180 iso-8-1
181 iso-7
182 no-conversion
183 ;; these two can cause core dump in some
184 ;; circumstances
185 iso-lock-shift
186 iso-8-designate))
181 187
182 (set-coding-category-system 'iso-7 'iso-2022-7) 188 (set-coding-category-system 'iso-7 'iso-2022-7)
183 (set-coding-category-system 'iso-8-designate 'ctext) 189 (set-coding-category-system 'iso-8-designate 'ctext)
184 (set-coding-category-system 'iso-8-1 'ctext) 190 (set-coding-category-system 'iso-8-1 'ctext)
185 (set-coding-category-system 'iso-lock-shift 'iso-2022-lock) 191 (set-coding-category-system 'iso-lock-shift 'iso-2022-lock)