diff --git a/portfolio/site.hs b/portfolio/site.hs
index 7b96a22..733c60c 100644
--- a/portfolio/site.hs
+++ b/portfolio/site.hs
@@ -438,7 +438,7 @@ main = hakyll $ do
             --language <- getMetadataField' ident "language"
 
             -- Seven days from today.
-            let cutoff = addUTCTime (7 * 24 * 60 * 60) now
+            let cutoff = addUTCTime (negate 7 * 24 * 60 * 60) now
 
             events <-
                 loadAll (fromGlob ("events/" ++ lang ++ "/*"))