diff --git a/src/input_xml.F90 b/src/input_xml.F90
index 766dbfa9f2..c76d66df7f 100644
--- a/src/input_xml.F90
+++ b/src/input_xml.F90
@@ -1920,10 +1920,7 @@ contains
     type(XMLDocument)       :: doc
     type(XMLNode)           :: root
 
-    ! Display output message
-    call write_message("Reading materials XML file...", 5)
-
-    ! Check is materials.xml exists
+    ! Check if materials.xml exists
     filename = trim(path_input) // "materials.xml"
     inquire(FILE=filename, EXIST=file_exists)
     if (.not. file_exists) then
@@ -2057,7 +2054,10 @@ contains
     type(XMLNode), allocatable :: node_macro_list(:)
     type(XMLNode), allocatable :: node_sab_list(:)
 
-    ! Check is materials.xml exists
+    ! Display output message
+    call write_message("Reading materials XML file...", 5)
+
+    ! Check if materials.xml exists
     filename = trim(path_input) // "materials.xml"
     inquire(FILE=filename, EXIST=file_exists)
     if (.not. file_exists) then
diff --git a/src/summary.F90 b/src/summary.F90
index e271fbaba6..248b48e865 100644
--- a/src/summary.F90
+++ b/src/summary.F90
@@ -11,7 +11,7 @@ module summary
   use message_passing
   use mgxs_header,     only: nuclides_MG
   use nuclide_header
-  use output,          only: time_stamp
+  use output,          only: time_stamp, write_message
   use settings,        only: run_CE
   use surface_header
   use string,          only: to_str
@@ -33,6 +33,9 @@ contains
 
     integer(HID_T) :: file_id
 
+    ! Display output message
+    call write_message("Writing summary.h5 file...", 5)
+
     ! Create a new file using default properties.
     file_id = file_create("summary.h5")