add tshirt deadline

zfoh · May 2, 2024 · 1d3f90c · 1d3f90c
1 parent 8c26618
commit 1d3f90c
Show file tree

Hide file tree

Showing 2 changed files with 1 addition and 3 deletions.
diff --git a/lib/Zureg/Hackathon/ZuriHac2024/Form.hs b/lib/Zureg/Hackathon/ZuriHac2024/Form.hs
@@ -48,11 +48,9 @@ additionalInfoView view = do
     H.h2 "Optional information"
 
     H.p $ H.strong "T-Shirt"
-    {-
     H.p $ H.strong $ do
         "Please note that we have ordered the T-Shirts and cannot guarantee "
         "that you will receive one if you register at this time."
-    -}
     H.p $ "In what size would you like the free T-Shirt?"
 
     DH.label "tshirtSize" view "Size"

diff --git a/lib/Zureg/Hackathon/ZuriHac2024/Views.hs b/lib/Zureg/Hackathon/ZuriHac2024/Views.hs
@@ -11,7 +11,7 @@ import qualified Zureg.Hackathon.ZuriHac2024.Model as ZH24
 import           Zureg.Model
 
 tShirtDeadline :: Time.UTCTime
-tShirtDeadline = Time.UTCTime (Time.fromGregorian 2024 5 5) (12 * 3600)
+tShirtDeadline = Time.UTCTime (Time.fromGregorian 2024 5 2) (12 * 3600)
 
 scanView :: Registrant ZH24.RegisterInfo -> H.Html
 scanView r@Registrant {..} = case rAdditionalInfo of