(Finsert_char): Check inherit flag for long strings too.

1 files changed, 6 insertions, 1 deletions

diff --git a/src/editfns.c b/src/editfns.c
index 2aa7ff42a2b..a7537be357d 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -1030,7 +1030,12 @@ from adjoining text, if those properties are sticky.")
       n -= strlen;
     }
   if (n > 0)
-    insert (string, n);
+    {
+      if (!NILP (inherit))
+        insert_and_inherit (string, n);
+      else
+        insert (string, n);
+    }
   return Qnil;
 }