From bbbbf9fea35464d0197170b1e44d9b75eb5d1866 Mon Sep 17 00:00:00 2001 From: tomo Date: Mon, 12 Aug 2002 14:18:37 +0000 Subject: [PATCH] Don't specify `auto-fill-chars' for `katakana-jisx0201', `japanese-jisx0208', `japanese-jisx0212', `chinese-gb2312', `chinese-big5-1' and `chinese-big5-2'. (default-coded-charset-priority-list): Add `chinese-big5-1' and `chinese-big5-2' in UTF-2000. --- lisp/mule/mule-charset.el | 16 +++++++++------- 1 file changed, 9 insertions(+), 7 deletions(-) diff --git a/lisp/mule/mule-charset.el b/lisp/mule/mule-charset.el index ba483a5..7f4dfbc 100644 --- a/lisp/mule/mule-charset.el +++ b/lisp/mule/mule-charset.el @@ -252,12 +252,12 @@ DESCRIPTION (string) is the description string of the charset." ;; 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)))) +;; (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 @@ -338,6 +338,8 @@ DESCRIPTION (string) is the description string of the charset." ideograph-hanziku-11 ideograph-hanziku-12 china3-jef - arabic-iso8859-6))) + arabic-iso8859-6 + chinese-big5-1 + chinese-big5-2))) ;;; mule-charset.el ends here -- 1.7.10.4