diff --git a/src/Owner.hs b/src/Owner.hs
index c9dba61..4deb848 100644
--- a/src/Owner.hs
+++ b/src/Owner.hs
@@ -297,4 +297,4 @@ findOwnerById i =
 findExpiringOwners :: UTCTime -> Action IO [Document]
 findExpiringOwners now =
   rest =<<
-  find (select ["expiration" =: ["$lte" =: addUTCTime 1728000 now]] "owners")
+  find (select ["expiration" =: ["$lte" =: addUTCTime 172800 now]] "owners")