diff --git a/Handler/Presentation.hs b/Handler/Presentation.hs index f87d942..e7616d4 100644 --- a/Handler/Presentation.hs +++ b/Handler/Presentation.hs @@ -36,6 +36,9 @@ getPresentation4RealR = do presentationLayout $(widgetFile "presentation-4real") +getPresentationDATeCH2017R = do + presentationLayout $(widgetFile "presentation-datech-2017") + getSampleLeaderboard name = do challengeEnt@(Entity challengeId challenge) <- runDB $ getBy404 $ UniqueName name diff --git a/config/routes b/config/routes index 09cf1e3..93ba798 100644 --- a/config/routes +++ b/config/routes @@ -43,3 +43,4 @@ /edit-submission/#SubmissionId EditSubmissionR GET POST /presentation/4real Presentation4RealR GET +/presentation/datech-2017 PresentationDATeCH2017R GET diff --git a/templates/presentation-datech-2017.hamlet b/templates/presentation-datech-2017.hamlet new file mode 100644 index 0000000..1cde43a --- /dev/null +++ b/templates/presentation-datech-2017.hamlet @@ -0,0 +1,37 @@ +