(Fwrite_region): Alternate messages for append and partial write.

1 files changed, 6 insertions, 1 deletions

diff --git a/src/fileio.c b/src/fileio.c
index fa8958c11b4..dc918b0851b 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -5222,7 +5222,12 @@ This does code conversion according to the value of
     return Qnil;
 
   if (!auto_saving)
-    message_with_string ("Wrote %s", visit_file, 1);
+    message_with_string ((! INTEGERP (append)
+                          ? "Updated %s"
+                          : ! NILP (append)
+                          ? "Added to %s"
+                          : "Wrote %s"),
+                         visit_file, 1);
 
   return Qnil;
 }