From: Karl Heuer <kwzh@gnu.org>
Date: Fri, 16 Sep 1994 23:39:59 +0000 (+0000)
Subject: (Finsert_file_contents) [MSDOS]: Don't re-gc-protect filename; delete unused
X-Git-Tag: emacs-19.34~7046
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=edb06ed060c878a2e56c5b8deb780f5ef578fa4b;p=emacs.git

(Finsert_file_contents) [MSDOS]: Don't re-gc-protect filename; delete unused
variables.
---

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.")
   /* Determine file type from name and remove LFs from CR-LFs if the file
      is deemed to be a text file.  */
   {
-    struct gcpro gcpro1;
-    Lisp_Object code;
-    code = Qnil;
-    GCPRO1 (filename);
     current_buffer->buffer_file_type
       = call1 (Qfind_buffer_file_type, filename);
-    UNGCPRO;
     if (NILP (current_buffer->buffer_file_type))
       {
 	int reduced_size