From 9956144405558933e130f39fb631b21985fba998 Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Wed, 15 Jun 2011 23:48:01 -0700 Subject: * insdel.c, lisp.h (buffer_overflow): New function. (insert_from_buffer_1, replace_range, replace_range_2): * insdel.c (make_gap_larger): * editfns.c (Finsert_char): * fileio.c (Finsert_file_contents): Use it, to normalize wording. --- src/editfns.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/editfns.c') diff --git a/src/editfns.c b/src/editfns.c index 9678d4da6a..dec0133951 100644 --- a/src/editfns.c +++ b/src/editfns.c @@ -2344,7 +2344,7 @@ from adjoining text, if those properties are sticky. */) else str[0] = c, len = 1; if (BUF_BYTES_MAX / len < XINT (count)) - error ("Maximum buffer size would be exceeded"); + buffer_overflow (); n = XINT (count) * len; if (n <= 0) return Qnil; -- cgit v1.2.3