diff options
| author | Karl Heuer | 1994-09-16 23:39:59 +0000 |
|---|---|---|
| committer | Karl Heuer | 1994-09-16 23:39:59 +0000 |
| commit | edb06ed060c878a2e56c5b8deb780f5ef578fa4b (patch) | |
| tree | 79183192e9d325559add3a0b7678617743e10483 /src | |
| parent | 05ed817ff198708a43e4de9372a7905d342e7c7f (diff) | |
| download | emacs-edb06ed060c878a2e56c5b8deb780f5ef578fa4b.tar.gz emacs-edb06ed060c878a2e56c5b8deb780f5ef578fa4b.zip | |
(Finsert_file_contents) [MSDOS]: Don't re-gc-protect filename; delete unused
variables.
Diffstat (limited to 'src')
| -rw-r--r-- | src/fileio.c | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/src/fileio.c b/src/fileio.c index eac15ce94ff..585ad5cf485 100644 --- a/src/fileio.c +++ b/src/fileio.c | |||
| @@ -2858,13 +2858,8 @@ and (2) it puts less data in the undo list.") | |||
| 2858 | /* Determine file type from name and remove LFs from CR-LFs if the file | 2858 | /* Determine file type from name and remove LFs from CR-LFs if the file |
| 2859 | is deemed to be a text file. */ | 2859 | is deemed to be a text file. */ |
| 2860 | { | 2860 | { |
| 2861 | struct gcpro gcpro1; | ||
| 2862 | Lisp_Object code; | ||
| 2863 | code = Qnil; | ||
| 2864 | GCPRO1 (filename); | ||
| 2865 | current_buffer->buffer_file_type | 2861 | current_buffer->buffer_file_type |
| 2866 | = call1 (Qfind_buffer_file_type, filename); | 2862 | = call1 (Qfind_buffer_file_type, filename); |
| 2867 | UNGCPRO; | ||
| 2868 | if (NILP (current_buffer->buffer_file_type)) | 2863 | if (NILP (current_buffer->buffer_file_type)) |
| 2869 | { | 2864 | { |
| 2870 | int reduced_size | 2865 | int reduced_size |