the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
-#include "config.h"
+#include <config.h>
#include "lisp.h"
#include "intervals.h"
#include "buffer.h"
before we bcopy the stuff into the buffer, and relocate the string
without insert noticing. */
-insert_from_string (string, pos, length)
+insert_from_string (string, pos, length, inherit)
Lisp_Object string;
register int pos, length;
+ int inherit;
{
register Lisp_Object temp;
struct gcpro gcpro1;
Z += length;
/* Only defined if Emacs is compiled with USE_TEXT_PROPERTIES */
- graft_intervals_into_buffer (XSTRING (string)->intervals, point,
- current_buffer);
+ graft_intervals_into_buffer (XSTRING (string)->intervals, point, length,
+ current_buffer, inherit);
SET_PT (point + length);
/* Insert part of a Lisp string, relocating markers after. */
-insert_from_string_before_markers (string, pos, length)
+insert_from_string_before_markers (string, pos, length, inherit)
Lisp_Object string;
register int pos, length;
+ int inherit;
{
register int opoint = point;
- insert_from_string (string, pos, length);
+ insert_from_string (string, pos, length, inherit);
adjust_markers (opoint - 1, opoint, length);
}
\f