comparison src/fileio.c @ 87304:d40e3ce78801

Undo spurious change.

87303:8022f6990a34

DEFUN ("insert-file-contents", Finsert_file_contents, Sinsert_file_contents,
       1, 5, 0,
       doc: /* Insert contents of file FILENAME after point.
	       Returns list of absolute file name and number of characters inserted.
	       If second argument VISIT is non-nil, the buffer's visited filename and
	       last save file modtime are set, and it is marked unmodified.  If
	       visiting and the file does not exist, visiting is completed before the
	       error is signaled.

	       The optional third and fourth arguments BEG and END specify what portion
	       of the file to insert.  These arguments count bytes in the file, not
	       characters in the buffer.  If VISIT is non-nil, BEG and END must be nil.

	       If optional fifth argument REPLACE is non-nil, replace the current
	       buffer contents (in the accessible portion) with the file contents.
	       This is better than simply deleting and inserting the whole thing
	       because (1) it preserves some marker positions and (2) it puts less data
	       in the undo list.  When REPLACE is non-nil, the second return value is
	       the number of characters that replace previous buffer contents.

	       This function does code conversion according to the value of
	       `coding-system-for-read' or `file-coding-system-alist', and sets the
	       variable `last-coding-system-used' to the coding system actually used.  */)
     (filename, visit, beg, end, replace)
     Lisp_Object filename, visit, beg, end, replace;
{
  struct stat st;
  register int fd;

87304:d40e3ce78801

DEFUN ("insert-file-contents", Finsert_file_contents, Sinsert_file_contents,
       1, 5, 0,
       doc: /* Insert contents of file FILENAME after point.
Returns list of absolute file name and number of characters inserted.
If second argument VISIT is non-nil, the buffer's visited filename and
last save file modtime are set, and it is marked unmodified.  If
visiting and the file does not exist, visiting is completed before the
error is signaled.

The optional third and fourth arguments BEG and END specify what portion
of the file to insert.  These arguments count bytes in the file, not
characters in the buffer.  If VISIT is non-nil, BEG and END must be nil.

If optional fifth argument REPLACE is non-nil, replace the current
buffer contents (in the accessible portion) with the file contents.
This is better than simply deleting and inserting the whole thing
because (1) it preserves some marker positions and (2) it puts less data
in the undo list.  When REPLACE is non-nil, the second return value is
the number of characters that replace previous buffer contents.

This function does code conversion according to the value of
`coding-system-for-read' or `file-coding-system-alist', and sets the
variable `last-coding-system-used' to the coding system actually used.  */)
     (filename, visit, beg, end, replace)
     Lisp_Object filename, visit, beg, end, replace;
{
  struct stat st;
  register int fd;