Commit 42b01e1e authored by Kenichi Handa's avatar Kenichi Handa
Browse files

(choose_write_coding_system): Even if

Vcoding_system_for_write is non-nil, if
coding_system_require_warning is nonzero, call
Vselect_safe_coding_system_function.
parent 6926d591
......@@ -4624,7 +4624,15 @@ choose_write_coding_system (start, end, filename,
if (auto_saving)
val = Qnil;
else if (!NILP (Vcoding_system_for_write))
val = Vcoding_system_for_write;
{
val = Vcoding_system_for_write;
if (coding_system_require_warning
&& !NILP (Ffboundp (Vselect_safe_coding_system_function)))
/* Confirm that VAL can surely encode the current region. */
val = call5 (Vselect_safe_coding_system_function,
start, end, Fcons (Qt, Fcons (val, Qnil)),
Qnil, filename);
}
else
{
/* If the variable `buffer-file-coding-system' is set locally,
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment