diff --git a/src/m_write_silo.f90 b/src/m_write_silo.f90
index 37790c76228d33bae644e81b00c5cc46273be504..ceebcceba252a57fe8b3ff3ef02d77264589b485 100644
--- a/src/m_write_silo.f90
+++ b/src/m_write_silo.f90
@@ -278,7 +278,7 @@ contains
     end if
 
     if (present(time)) then
-       ierr = dbaddiopt(dboptix, DBOPT_DTIME, time)
+       ierr = dbadddopt(dboptix, DBOPT_DTIME, time)
     end if
 
     ierr = dbputmmesh(dbix, trim(mmname), len_trim(mmname), n_grids, &