1 files changed, 2 insertions, 0 deletions

diff --git a/src/fileio.c b/src/fileio.c
index 742c7ad95fe..5c81f0a2088 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -3334,6 +3334,8 @@ actually used.")
     {
       val = call6 (handler, Qinsert_file_contents, filename,
                    visit, beg, end, replace);
+      if (CONSP (val) && CONSP (XCONS (val)->cdr))
+        inserted = XINT (XCONS (XCONS (val)->cdr)->cdr);
       goto handled;
     }