From 2718dfa4b84b569a7f03e42f257d984bd473fea6 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 16 Aug 1995 15:00:57 +0000 Subject: [PATCH] (Fself_insert_command): Optimize the case with arg > 2 to avoid running change hooks lots of times. --- src/cmds.c | 15 ++++++++++++++- 1 file changed, 14 insertions(+), 1 deletion(-) diff --git a/src/cmds.c b/src/cmds.c index 48e89b2cabe..2a912368cb0 100644 --- a/src/cmds.c +++ b/src/cmds.c @@ -221,6 +221,18 @@ Whichever character you type to run this command is inserted.") /* Barf if the key that invoked this was not a character. */ if (!INTEGERP (last_command_char)) bitch_at_user (); + else if (XINT (arg) >= 2 && NILP (current_buffer->overwrite_mode)) + { + XSETFASTINT (arg, XFASTINT (arg) - 2); + /* The first one might want to expand an abbrev. */ + internal_self_insert (XINT (last_command_char), 1); + /* The bulk of the copies of this char can be inserted simply. + We don't have to handle a user-specified face specially + because it will get inherited from the first char inserted. */ + Finsert_char (last_command_char, arg, Qt); + /* The last one might want to auto-fill. */ + internal_self_insert (XINT (last_command_char), 0); + } else while (XINT (arg) > 0) { @@ -313,7 +325,8 @@ internal_self_insert (c1, noautofill) #endif synt = SYNTAX (c); if ((synt == Sclose || synt == Smath) - && !NILP (Vblink_paren_function) && INTERACTIVE) + && !NILP (Vblink_paren_function) && INTERACTIVE + && !noautofill) { call0 (Vblink_paren_function); hairy = 2; -- 2.39.2