Mercurial > emacs
comparison src/fileio.c @ 87304:d40e3ce78801
Undo spurious change.
author | Andreas Schwab <schwab@suse.de> |
---|---|
date | Sun, 16 Dec 2007 10:54:19 +0000 |
parents | 591bf917aa89 |
children | 107ccd98fa12 56a72e2bd635 |
comparison
equal
deleted
inserted
replaced
87303:8022f6990a34 | 87304:d40e3ce78801 |
---|---|
3692 | 3692 |
3693 | 3693 |
3694 DEFUN ("insert-file-contents", Finsert_file_contents, Sinsert_file_contents, | 3694 DEFUN ("insert-file-contents", Finsert_file_contents, Sinsert_file_contents, |
3695 1, 5, 0, | 3695 1, 5, 0, |
3696 doc: /* Insert contents of file FILENAME after point. | 3696 doc: /* Insert contents of file FILENAME after point. |
3697 Returns list of absolute file name and number of characters inserted. | 3697 Returns list of absolute file name and number of characters inserted. |
3698 If second argument VISIT is non-nil, the buffer's visited filename and | 3698 If second argument VISIT is non-nil, the buffer's visited filename and |
3699 last save file modtime are set, and it is marked unmodified. If | 3699 last save file modtime are set, and it is marked unmodified. If |
3700 visiting and the file does not exist, visiting is completed before the | 3700 visiting and the file does not exist, visiting is completed before the |
3701 error is signaled. | 3701 error is signaled. |
3702 | 3702 |
3703 The optional third and fourth arguments BEG and END specify what portion | 3703 The optional third and fourth arguments BEG and END specify what portion |
3704 of the file to insert. These arguments count bytes in the file, not | 3704 of the file to insert. These arguments count bytes in the file, not |
3705 characters in the buffer. If VISIT is non-nil, BEG and END must be nil. | 3705 characters in the buffer. If VISIT is non-nil, BEG and END must be nil. |
3706 | 3706 |
3707 If optional fifth argument REPLACE is non-nil, replace the current | 3707 If optional fifth argument REPLACE is non-nil, replace the current |
3708 buffer contents (in the accessible portion) with the file contents. | 3708 buffer contents (in the accessible portion) with the file contents. |
3709 This is better than simply deleting and inserting the whole thing | 3709 This is better than simply deleting and inserting the whole thing |
3710 because (1) it preserves some marker positions and (2) it puts less data | 3710 because (1) it preserves some marker positions and (2) it puts less data |
3711 in the undo list. When REPLACE is non-nil, the second return value is | 3711 in the undo list. When REPLACE is non-nil, the second return value is |
3712 the number of characters that replace previous buffer contents. | 3712 the number of characters that replace previous buffer contents. |
3713 | 3713 |
3714 This function does code conversion according to the value of | 3714 This function does code conversion according to the value of |
3715 `coding-system-for-read' or `file-coding-system-alist', and sets the | 3715 `coding-system-for-read' or `file-coding-system-alist', and sets the |
3716 variable `last-coding-system-used' to the coding system actually used. */) | 3716 variable `last-coding-system-used' to the coding system actually used. */) |
3717 (filename, visit, beg, end, replace) | 3717 (filename, visit, beg, end, replace) |
3718 Lisp_Object filename, visit, beg, end, replace; | 3718 Lisp_Object filename, visit, beg, end, replace; |
3719 { | 3719 { |
3720 struct stat st; | 3720 struct stat st; |
3721 register int fd; | 3721 register int fd; |