1 files changed, 1 insertions, 2 deletions

diff --git a/CosmicCalendarEvents.hs b/CosmicCalendarEvents.hs
index 0973539..224fbe8 100644
--- a/CosmicCalendarEvents.hs
+++ b/CosmicCalendarEvents.hs
@@ -7,12 +7,11 @@ module CosmicCalendarEvents where
 
 import Rebase.Prelude
 import NeatInterpolation
-import qualified Rebase.Data.Map.Strict as Map
 
 import CosmicCalendar
 
 theCalendar :: Map NominalDiffTime CalendarEntry
-theCalendar = Map.fromList $ map (\x -> (calBeginTime x, x)) $ map unwrap
+theCalendar = buildCalendar $
   [
     CalendarEntry 0 Nothing "The Big Bang" "The universe begins" "" "",
     CalendarEntry (370 & thousandYears & afterBigBang)