Mercurial > hg > xemacs-beta

comparison lisp/mule/mule-coding.el @ 86:364816949b59 r20-0b93

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-0b93
author cvs
date Mon, 13 Aug 2007 09:09:02 +0200
parents 1ce6082ce73f
children a145efe76779
comparison
equal deleted inserted replaced
85:c661705957e0 86:364816949b59
254 254
255 ;; initialize the coding categories to something semi-reasonable 255 ;; initialize the coding categories to something semi-reasonable
256 ;; so that the remaining Lisp files can contain extended characters. 256 ;; so that the remaining Lisp files can contain extended characters.
257 ;; (They will be in ISO-7 format) 257 ;; (They will be in ISO-7 format)
258 258
259 (set-coding-priority-list '(iso-8-2 shift-jis iso-8-designate iso-8-1 big5 259 (set-coding-priority-list '(iso-8-2 iso-8-designate iso-8-1
260 iso-7 iso-lock-shift no-conversion)) 260 iso-7 iso-lock-shift no-conversion))
261 261
262 (set-coding-category-system 'iso-7 'iso-2022-7) 262 (set-coding-category-system 'iso-7 'iso-2022-7)
263 (set-coding-category-system 'iso-8-designate 'ctext) 263 (set-coding-category-system 'iso-8-designate 'ctext)
264 (set-coding-category-system 'iso-8-1 'ctext) 264 (set-coding-category-system 'iso-8-1 'ctext)