Mercurial > emacs

comparison src/fileio.c @ 45640:a181c1d41a78

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(choose_write_coding_system): Call select-safe-coding-system properly.
author Pavel Janík <Pavel@Janik.cz>
date Wed, 05 Jun 2002 05:16:48 +0000
parents 6d7e86e98b2c
children 9c590b35c6cf
comparison
equal deleted inserted replaced
45639:86424df72c8b 45640:a181c1d41a78
4672 } 4672 }
4673 4673
4674 if (!force_raw_text 4674 if (!force_raw_text
4675 && !NILP (Ffboundp (Vselect_safe_coding_system_function))) 4675 && !NILP (Ffboundp (Vselect_safe_coding_system_function)))
4676 /* Confirm that VAL can surely encode the current region. */ 4676 /* Confirm that VAL can surely encode the current region. */
4677 val = call4 (Vselect_safe_coding_system_function, 4677 val = call5 (Vselect_safe_coding_system_function,
4678 start, end, val, filename); 4678 start, end, val, Qnil, filename);
4679 4679
4680 setup_coding_system (Fcheck_coding_system (val), coding); 4680 setup_coding_system (Fcheck_coding_system (val), coding);
4681 if (coding->eol_type == CODING_EOL_UNDECIDED 4681 if (coding->eol_type == CODING_EOL_UNDECIDED
4682 && !using_default_coding) 4682 && !using_default_coding)
4683 { 4683 {