comparison src/fileio.c @ 17396:7fbce3c83857

(Finsert_file_contents): Do call signal_after_change when REPLACE is handled by reading directly from the file. Use insert_1 to insert replacement text, to avoid query about whether to modify the buffer.

17395:ad9d92edda0d

	 and update INSERTED to equal the number of bytes
	 we are taking from the file.  */
      inserted -= (Z - same_at_end) + (same_at_start - BEG);
      move_gap (same_at_start);
      del_range_1 (same_at_start, same_at_end, 0);
      insert (conversion_buffer + same_at_start - BEG, inserted);

      free (conversion_buffer);
      close (fd);
      specpdl_ptr--;

		      Qnil, make_number (inserted), visit);
      CHECK_NUMBER (insval, 0);
      inserted = XFASTINT (insval);
    }

  if (inserted > 0 && NILP (visit) && total > 0)
    signal_after_change (PT, 0, inserted);

  if (inserted > 0)
    {
      p = Vafter_insert_file_functions;

17396:7fbce3c83857

	 and update INSERTED to equal the number of bytes
	 we are taking from the file.  */
      inserted -= (Z - same_at_end) + (same_at_start - BEG);
      move_gap (same_at_start);
      del_range_1 (same_at_start, same_at_end, 0);
      SET_PT (same_at_start);
      insert_1 (conversion_buffer + same_at_start - BEG, inserted, 0, 0);

      free (conversion_buffer);
      close (fd);
      specpdl_ptr--;

		      Qnil, make_number (inserted), visit);
      CHECK_NUMBER (insval, 0);
      inserted = XFASTINT (insval);
    }

  /* Call after-change hooks for the inserted text, aside from the case
     of normal visiting (not with REPLACE), which is done in a new buffer
     "before" the buffer is changed.  */
  if (inserted > 0 && total > 0
      && (NILP (visit) || !NILP (replace)))
    signal_after_change (PT, 0, inserted);

  if (inserted > 0)
    {
      p = Vafter_insert_file_functions;