aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPer Starbäck2016-02-25 16:22:17 +1030
committerLars Ingebrigtsen2016-02-25 16:22:17 +1030
commitfecd5e589d01b39e9c0c2f0a9ed300ba8cb09817 (patch)
tree942ebf3110c7ef678ebcf7e5c5114aa84f8134b8
parent80c4cfa965fe361884979c4f50ffcb2401bf1032 (diff)
downloademacs-fecd5e589d01b39e9c0c2f0a9ed300ba8cb09817.tar.gz
emacs-fecd5e589d01b39e9c0c2f0a9ed300ba8cb09817.zip
Replace XXX acronyms with draft standard ones
* lisp/international/characters.el (c1-acronyms): Replace XXX entries with the acronyms PAD, HOP, SGCI from draft DIS 10646 (bug#13745).
-rw-r--r--lisp/international/characters.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/international/characters.el b/lisp/international/characters.el
index a43c0f68070..56f6c80fe81 100644
--- a/lisp/international/characters.el
+++ b/lisp/international/characters.el
@@ -1307,10 +1307,10 @@ Setup char-width-table appropriate for non-CJK language environment."
1307 (aset char-acronym-table i (car c0-acronyms)) 1307 (aset char-acronym-table i (car c0-acronyms))
1308 (setq c0-acronyms (cdr c0-acronyms)))) 1308 (setq c0-acronyms (cdr c0-acronyms))))
1309 1309
1310(let ((c1-acronyms '("XXX" "XXX" "BPH" "NBH" "IND" "NEL" "SSA" "ESA" 1310(let ((c1-acronyms '("PAD" "HOP" "BPH" "NBH" "IND" "NEL" "SSA" "ESA"
1311 "HTS" "HTJ" "VTS" "PLD" "PLU" "R1" "SS2" "SS1" 1311 "HTS" "HTJ" "VTS" "PLD" "PLU" "R1" "SS2" "SS1"
1312 "DCS" "PU1" "PU2" "STS" "CCH" "MW" "SPA" "EPA" 1312 "DCS" "PU1" "PU2" "STS" "CCH" "MW" "SPA" "EPA"
1313 "SOS" "XXX" "SC1" "CSI" "ST" "OSC" "PM" "APC"))) 1313 "SOS" "SGCI" "SC1" "CSI" "ST" "OSC" "PM" "APC")))
1314 (dotimes (i 32) 1314 (dotimes (i 32)
1315 (aset char-acronym-table (+ #x0080 i) (car c1-acronyms)) 1315 (aset char-acronym-table (+ #x0080 i) (car c1-acronyms))
1316 (setq c1-acronyms (cdr c1-acronyms)))) 1316 (setq c1-acronyms (cdr c1-acronyms))))