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

diff --git a/src/fileio.c b/src/fileio.c
index fa8958c11b4c8d5b1a73ca5f23f442b5fe3f815f..dc918b0851b77b7278371eb3cb74668deb31fa97 100644 (file)
--- 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;
 }