;; Copyright (C) 1992 Free Software Foundation, Inc.
;; Copyright (C) 1995 Amdahl Corporation.
;; Copyright (C) 1996 Sun Microsystems.
-;; Copyright (C) 1999 Electrotechnical Laboratory, JAPAN.
-;; Licensed to the Free Software Foundation.
+;; Copyright (C) 1999,2000 MORIOKA Tomohiko
;; Author: Unknown
;; Keywords: i18n, mule, internal
(defalias 'charset-plist 'object-plist)
(defalias 'set-charset-plist 'setplist)
+;; Setup auto-fill-chars for charsets that should invoke auto-filling.
+;; SPACE and NEWLIE are already set.
+(let ((l '(katakana-jisx0201
+ japanese-jisx0208 japanese-jisx0212
+ chinese-gb2312 chinese-big5-1 chinese-big5-2)))
+ (while l
+ (put-char-table (car l) t auto-fill-chars)
+ (setq l (cdr l))))
+
;;; @ Coded character set
;;;
(when (featurep 'utf-2000)
(setq default-coded-charset-priority-list
'(ascii
- ;; latin-iso646-irv
control-1
latin-iso8859-1
latin-iso8859-2
cyrillic-iso8859-5
greek-iso8859-7
thai-tis620
- ;; hiragana-jisx0208
- ;; katakana-jisx0208
japanese-jisx0208
japanese-jisx0212
+ japanese-jisx0213-1
+ japanese-jisx0213-2
+ japanese-jisx0208-1990
+ korean-ksc5601
+ japanese-jisx0208-1978
chinese-cns11643-1
chinese-cns11643-2
chinese-cns11643-3
chinese-cns11643-5
chinese-cns11643-6
chinese-cns11643-7
- korean-ksc5601
+ chinese-gb2312
+ katakana-jisx0201
hebrew-iso8859-8
latin-viscii
latin-viscii-lower
lao
ethiopic-ucs
ethiopic
+ mojikyo
+;;; mojikyo-pj-1
+;;; mojikyo-pj-2
+;;; mojikyo-pj-3
+;;; mojikyo-pj-4
+;;; mojikyo-pj-5
+;;; mojikyo-pj-6
+;;; mojikyo-pj-7
+;;; mojikyo-pj-8
+;;; mojikyo-pj-9
+;;; mojikyo-pj-10
+;;; mojikyo-pj-11
+;;; mojikyo-pj-12
+;;; mojikyo-pj-13
+;;; mojikyo-pj-14
+;;; mojikyo-pj-15
+;;; mojikyo-pj-16
+;;; mojikyo-pj-17
+;;; mojikyo-pj-18
+;;; mojikyo-pj-19
+;;; mojikyo-pj-20
+;;; mojikyo-pj-21
+ ideograph-daikanwa
ucs-bmp
arabic-iso8859-6)))