procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(make-coding-system): Distinguish coding-category-iso-7-else and

Browse source 
coding-category-iso-8-else.
This commit is contained in:
Kenichi Handa 1997-07-15 08:24:47 +00:00
parent 55e3018122
commit dc64cd193a
1 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lisp/international/mule.el
View file

@ -432,13 +432,14 @@ FLAGS specifies more precise information of each TYPE.
(put coding-system 'no-initial-designation t))
(setq coding-category
(if (aref vec 8) ; Use locking-shift.
'coding-category-iso-else
(or (and (aref vec 7) 'coding-category-iso-7-else)
'coding-category-iso-8-else)
(if (aref vec 7) ; 7-bit only.
(if (aref vec 9) ; Use single-shift.
'coding-category-iso-else
'coding-category-iso-7-else
'coding-category-iso-7)
(if no-initial-designation
'coding-category-iso-else
'coding-category-iso-8-else
(if (and (charsetp g1-designation)
(= (charset-dimension g1-designation) 2))
'coding-category-iso-8-2