summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>1998-06-12 08:35:09 +0000
committerKenichi Handa <handa@m17n.org>1998-06-12 08:35:09 +0000
commit071d21d48d1d38fb4838151e7da93147852f0400 (patch)
treecdea7c56c9fa7ec04ff1b27d9d387a72cb3c07e4
parent7d5165373951950d237826a08167003777fefc09 (diff)
downloademacs-071d21d48d1d38fb4838151e7da93147852f0400.tar.gz
(Finsert_file_contents): After calling handler,
get INSERTED from the handler's value.
-rw-r--r--src/fileio.c2
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;
}