mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-26 07:11:34 -08:00
(Finsert_file_contents): Always update
Vlast_coding_system_used when we actually perform IO. (Fwrite_region): Update documentation.
This commit is contained in:
parent
640e944552
commit
6cf71bf1f7
1 changed files with 14 additions and 6 deletions
20
src/fileio.c
20
src/fileio.c
|
|
@ -3266,10 +3266,11 @@ the whole thing because (1) it preserves some marker positions\n\
|
|||
and (2) it puts less data in the undo list.\n\
|
||||
When REPLACE is non-nil, the value is the number of characters actually read,\n\
|
||||
which is often less than the number of characters to be read.\n\
|
||||
\n\
|
||||
This does code conversion according to the value of\n\
|
||||
`coding-system-for-read' or `file-coding-system-alist',\n\
|
||||
and sets the variable `last-coding-system-used' to the coding system\n\
|
||||
actually used.")
|
||||
`coding-system-for-read' or `file-coding-system-alist',\n\
|
||||
and sets the variable `last-coding-system-used' to the coding system\n\
|
||||
actually used.")
|
||||
(filename, visit, beg, end, replace)
|
||||
Lisp_Object filename, visit, beg, end, replace;
|
||||
{
|
||||
|
|
@ -3542,6 +3543,9 @@ This does code conversion according to the value of\n\
|
|||
}
|
||||
else
|
||||
setup_coding_system (Fcheck_coding_system (val), &coding);
|
||||
|
||||
/* Ensure we always set Vlast_coding_system_used. */
|
||||
set_coding_system = 1;
|
||||
}
|
||||
|
||||
/* If requested, replace the accessible part of the buffer
|
||||
|
|
@ -4029,8 +4033,6 @@ This does code conversion according to the value of\n\
|
|||
#endif
|
||||
}
|
||||
|
||||
set_coding_system = 1;
|
||||
|
||||
notfound:
|
||||
handled:
|
||||
|
||||
|
|
@ -4157,7 +4159,13 @@ The optional sixth arg LOCKNAME, if non-nil, specifies the name to\n\
|
|||
The optional seventh arg CONFIRM, if non-nil, says ask for confirmation\n\
|
||||
before overwriting an existing file.\n\
|
||||
Kludgy feature: if START is a string, then that string is written\n\
|
||||
to the file, instead of any buffer contents, and END is ignored.")
|
||||
to the file, instead of any buffer contents, and END is ignored.\n\
|
||||
\n\
|
||||
This does code conversion according to the value of\n\
|
||||
`coding-system-for-write', `buffer-file-coding-system', or\n\
|
||||
`file-coding-system-alist', and sets the variable\n\
|
||||
`last-coding-system-used' to the coding system actually used.")
|
||||
|
||||
(start, end, filename, append, visit, lockname, confirm)
|
||||
Lisp_Object start, end, filename, append, visit, lockname, confirm;
|
||||
{
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue