Commit bf162ea8 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(Finsert_file_contents): Fix accessing buffer_file_type

since it is t or nil.  Change to handle t or nil as value
of find-buffer-file-type.
parent d9209dee
......@@ -2796,11 +2796,10 @@ and (2) it puts less data in the undo list.")
Lisp_Object code;
code = Qnil;
GCPRO1 (filename);
code = call1 (Qfind_buffer_file_type, filename);
current_buffer->buffer_file_type
= call1 (Qfind_buffer_file_type, filename);
UNGCPRO;
if (XTYPE (code) == Lisp_Int)
XFASTINT (current_buffer->buffer_file_type) = XFASTINT (code);
if (XFASTINT (current_buffer->buffer_file_type) == 0)
if (NILP (current_buffer->buffer_file_type))
{
int reduced_size
= inserted - crlf_to_lf (inserted, &FETCH_CHAR (point - 1) + 1);
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment