diff --git a/ChangeLog b/ChangeLog
index 1ede37091..eee8e78a7 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2014-01-23  Colin Watson  <cjwatson@ubuntu.com>
+
+	* util/grub-install.c (write_to_disk): Add an info message.
+
 2014-01-21  Andrey Borzenkov <arvidjaar@gmail.com>
 
 	* Makefile.am: Allow adding extra files to generated Windows ZIP
diff --git a/util/grub-install.c b/util/grub-install.c
index 5903f340a..787dc90fc 100644
--- a/util/grub-install.c
+++ b/util/grub-install.c
@@ -675,6 +675,7 @@ write_to_disk (grub_device_t dev, const char *fn)
 
   core_img = grub_util_read_image (fn);    
 
+  grub_util_info ("writing `%s' to `%s'", fn, dev->disk->name);
   err = grub_disk_write (dev->disk, 0, 0,
 			 core_size, core_img);
   free (core_img);