aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKenichi Handa1997-02-26 12:52:25 +0000
committerKenichi Handa1997-02-26 12:52:25 +0000
commitd0c5d80937ebb3658777d5c982bf2c45e3905fbb (patch)
tree924bde3237e31e5c1de6f8d7e04ac3fa0215cf02
parentef8a8c8cba75436ee7e6cb1fe0c0b42f5c605a9f (diff)
downloademacs-d0c5d80937ebb3658777d5c982bf2c45e3905fbb.tar.gz
emacs-d0c5d80937ebb3658777d5c982bf2c45e3905fbb.zip
Add INIT-BOL to coding system iso-2022-cjk.
Remove prefix "coding-system-" from coding system symbol names. Change coding system names iso-2022-int to iso-2022-int-1, iso-2022-int-2 to iso-2022-cjk.
-rw-r--r--lisp/international/mule-conf.el33
1 files changed, 17 insertions, 16 deletions
diff --git a/lisp/international/mule-conf.el b/lisp/international/mule-conf.el
index ab9fe12c0ae..aecefff3b2b 100644
--- a/lisp/international/mule-conf.el
+++ b/lisp/international/mule-conf.el
@@ -220,45 +220,46 @@
220;; Coding systems not specific to each language environment. 220;; Coding systems not specific to each language environment.
221 221
222(make-coding-system 222(make-coding-system
223 'coding-system-internal 0 ?= 223 'internal 0 ?=
224 "Internal coding system used in a buffer.") 224 "Internal coding system used in a buffer.")
225 225
226(make-coding-system 226(make-coding-system
227 'coding-system-iso-2022-7 2 ?J 227 'iso-2022-7 2 ?J
228 "Coding system based on ISO2022 7-bit encoding." 228 "Coding system based on ISO2022 7-bit encoding."
229 '((ascii t) nil nil nil 229 '((ascii t) nil nil nil
230 short ascii-eol ascii-cntl seven)) 230 short ascii-eol ascii-cntl seven))
231 231
232(make-coding-system 232(make-coding-system
233 'coding-system-iso-2022-int 2 ?I 233 'iso-2022-int-1 2 ?I
234 "ISO-2022-INT-1" 234 "ISO-2022-INT-1"
235 '((ascii t) (korean-ksc5601 t) nil nil 235 '((ascii t) (korean-ksc5601 t) nil nil
236 short ascii-eol ascii-cntl seven locking-shift)) 236 short ascii-eol ascii-cntl seven locking-shift))
237 237
238(make-coding-system 238(make-coding-system
239 'coding-system-iso-2022-int-2 2 ?I 239 'iso-2022-cjk 2 ?I
240 "ISO-2022-INT-2" 240 "Mixture of ISO-2022-JP, ISO-2022-KR, and ISO-2022-CN"
241 '((ascii t) 241 '((ascii t)
242 (nil korean-ksc5601 chinese-gb2312 chinese-cns11643-1 t) 242 (nil korean-ksc5601 chinese-gb2312 chinese-cns11643-1 t)
243 (nil chinese-cns11643-2) 243 (nil chinese-cns11643-2)
244 (nil chinese-cns11643-3 chinese-cns11643-4 chinese-cns11643-5 244 (nil chinese-cns11643-3 chinese-cns11643-4 chinese-cns11643-5
245 chinese-cns11643-6 chinese-cns11643-7) 245 chinese-cns11643-6 chinese-cns11643-7)
246 short ascii-eol ascii-cntl seven locking-shift single-shift)) 246 short ascii-eol ascii-cntl seven locking-shift single-shift nil nil nil
247 init-bol))
247 248
248(make-coding-system 249(make-coding-system
249 'coding-system-iso-2022-ss2-8 2 ?I 250 'iso-2022-ss2-8 2 ?I
250 "ISO-2022 coding system using SS2 for 96-charset in 8-bit code." 251 "ISO-2022 coding system using SS2 for 96-charset in 8-bit code."
251 '((ascii t) nil t nil 252 '((ascii t) nil t nil
252 nil ascii-eol ascii-cntl nil nil single-shift)) 253 nil ascii-eol ascii-cntl nil nil single-shift))
253 254
254(make-coding-system 255(make-coding-system
255 'coding-system-iso-2022-ss2-7 2 ?I 256 'iso-2022-ss2-7 2 ?I
256 "ISO-2022 coding system using SS2 for 96-charset in 7-bit code." 257 "ISO-2022 coding system using SS2 for 96-charset in 7-bit code."
257 '((ascii t) nil t nil 258 '((ascii t) nil t nil
258 short ascii-eol ascii-cntl seven nil single-shift)) 259 short ascii-eol ascii-cntl seven nil single-shift))
259 260
260(make-coding-system 261(make-coding-system
261 'coding-system-iso-2022-lock 2 ?i 262 'iso-2022-lock 2 ?i
262 "ISO-2022 coding system using Locking-Shift for 96-charset." 263 "ISO-2022 coding system using Locking-Shift for 96-charset."
263 '((ascii t) t nil nil 264 '((ascii t) t nil nil
264 nil ascii-eol ascii-cntl locking-shift)) 265 nil ascii-eol ascii-cntl locking-shift))
@@ -287,13 +288,13 @@
287;; values are set by the command `setup-language-environment' for each 288;; values are set by the command `setup-language-environment' for each
288;; language environment. 289;; language environment.
289 290
290(setq coding-category-internal 'coding-system-internal 291(setq coding-category-internal 'internal
291 coding-category-sjis 'coding-system-sjis 292 coding-category-sjis 'sjis
292 coding-category-iso-7 'coding-system-iso-2022-7 293 coding-category-iso-7 'iso-2022-7
293 coding-category-iso-8-1 'coding-system-iso-8859-1 294 coding-category-iso-8-1 'iso-8859-1
294 coding-category-iso-8-2 'coding-system-euc-japan 295 coding-category-iso-8-2 'euc-japan
295 coding-category-iso-else 'coding-system-iso-2022-int 296 coding-category-iso-else 'iso-2022-cjk
296 coding-category-big5 'coding-system-big5 297 coding-category-big5 'big5
297 coding-category-binary 'no-conversion) 298 coding-category-binary 'no-conversion)
298 299
299(set-coding-priority 300(set-coding-priority