changeset 30490:6c62244b12b8

*** empty log message ***

--- a/lisp/ChangeLog	Thu Jul 27 06:03:21 2000 +0000
+++ b/lisp/ChangeLog	Thu Jul 27 06:07:14 2000 +0000
@@ -1,3 +1,40 @@
[phone]  Kenichi Handa  <[e-mail]>
+
+	* international/mule.el (register-char-codings): New function.
+	(make-coding-system): Handle `safe-chars' specification in the arg
+	PROPERTY.
+
+	* international/mule-cmds.el
+	(find-coding-systems-region-subset-p): This function deleted.
+	(sort-coding-systems-predicate): New variable.
+	(sort-coding-systems): New function.
+	(find-coding-systems-region): Use
+	find-coding-systems-region-internal.
+	(find-coding-systems-string): Use find-coding-systems-region.
+	(find-coding-systems-for-charsets): Check
+	char-coding-system-table.
+	(select-safe-coding-system-accept-default-p): New variable.
+	(select-safe-coding-system): Mostly rewritten.  New argument
+	ACCEPT-DEFAULT-P.
+	(select-message-coding-system): Call select-safe-coding-system
+	with ACCEPT-DEFAULT-P arg.
+	(reset-language-environment): Reset default-sendmail-coding-system
+	to the default value iso-latin-1.
+	(set-language-environment): Don't set the obsolete variable
+	charset-origin-alist.
+
+	* international/codepage.el (cp-coding-system-for-codepage-1):
+	Give `safe-chars' property to make-coding-system.
+
+	* mail/sendmail.el (sendmail-send-it): Improve the way to avoid
+	calling select-message-coding-system twice.
+
+	* language/cyrillic.el (cyrillic-koi8): Use `safe-chars' property
+	instead of `safe-charsets'.
+	(cyrillic-alternativnyj): Likewise.
+	(ccl-encode-alternativnyj): Don't check the charset
+	cyrillic-iso8859-5.
+
 2000-07-27  Kenichi Handa  <[e-mail]>
 
 	* composite.el (compose-chars-after): Preserve match data.

--- a/src/ChangeLog	Thu Jul 27 06:03:21 2000 +0000
+++ b/src/ChangeLog	Thu Jul 27 06:07:14 2000 +0000
@@ -1,3 +1,37 @@
[phone]  Kenichi Handa  <[e-mail]>
+
+	* coding.h (struct coding_system): Member safe_charset deleted.
+
+	* coding.c (Qsafe_charsets): This variable deleted.
+	(Qsafe_chars, Vchar_coding_system_table, Qchar_coding_system): New
+	variables.
+	(coding_safe_chars): New function.
+	(CODING_SAFE_CHAR_P): New macro.
+	(CHARSET_OK): New arg C.  Call CODING_SAFE_CHAR_P instead of
+	checking safe_charsets member of the coding system.  Caller
+	changed.
+	(detect_coding_iso2022): New local variable safe_chars.
+	(DECODE_DESIGNATION): Call CODING_SAFE_CHAR_P instead of checking
+	safe_charsets member of the coding system.
+	(decode_coding_iso2022): New local variable safe_chars.
+	(ENCODE_ISO_CHARACTER_DIMENSION1): Don't check unsafe chars here.
+	(ENCODE_ISO_CHARACTER_DIMENSION2): Likewise.
+	(ENCODE_ISO_CHARACTER): Arguments changed.  Caller changed.
+	(ENCODE_UNSAFE_CHARACTER): New macro.
+	(encode_coding_iso2022): New local variable safe_chars.  Check
+	unsafe chars.
+	(setup_coding_system): Delete the code to initialize
+	coding->safe_charses
+	(intersection, find_safe_codings): New functions.
+	(Ffind_coding_systems_region_internal): New function.
+	(syms_of_coding): Defsubr it.  Initialize Qsafe_chars,
+	Qsafe_cding_system.  Make Vchar_coding_system_table a Lisp
+	variable and initialize it.
+
+	* fns.c (char_table_ref_and_index): New function.
+
+	* lisp.h (char_table_ref_and_index): Add prototype.
+
 2000-07-26  Sam Steingold  <[e-mail]>
 
 	* editfns.c (lisp_time_argument): Added third argument `usec'.