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

Replace XXX acronyms with draft standard ones

Browse source 
* lisp/international/characters.el (c1-acronyms): Replace XXX
entries with the acronyms PAD, HOP, SGCI from draft DIS 10646
(bug#13745).
This commit is contained in:
Per Starbäck 2016-02-25 16:22:17 +10:30 • committed by Lars Ingebrigtsen
parent 80c4cfa965
commit fecd5e589d
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/international/characters.el
View file

@ -1307,10 +1307,10 @@ Setup char-width-table appropriate for non-CJK language environment."
(aset char-acronym-table i (car c0-acronyms))
(setq c0-acronyms (cdr c0-acronyms))))
(let ((c1-acronyms '("XXX" "XXX" "BPH" "NBH" "IND" "NEL" "SSA" "ESA"
(let ((c1-acronyms '("PAD" "HOP" "BPH" "NBH" "IND" "NEL" "SSA" "ESA"
"HTS" "HTJ" "VTS" "PLD" "PLU" "R1" "SS2" "SS1"
"DCS" "PU1" "PU2" "STS" "CCH" "MW" "SPA" "EPA"
"SOS" "XXX" "SC1" "CSI" "ST" "OSC" "PM" "APC")))
"SOS" "SGCI" "SC1" "CSI" "ST" "OSC" "PM" "APC")))
(dotimes (i 32)
(aset char-acronym-table (+ #x0080 i) (car c1-acronyms))
(setq c1-acronyms (cdr c1-acronyms))))