aboutsummaryrefslogtreecommitdiff
path: root/src/Endpoints/VersionsEndpoint.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Endpoints/VersionsEndpoint.hs')
-rw-r--r--src/Endpoints/VersionsEndpoint.hs12
1 files changed, 12 insertions, 0 deletions
diff --git a/src/Endpoints/VersionsEndpoint.hs b/src/Endpoints/VersionsEndpoint.hs
new file mode 100644
index 0000000..79fd3ea
--- /dev/null
+++ b/src/Endpoints/VersionsEndpoint.hs
@@ -0,0 +1,12 @@
+{-# LANGUAGE DataKinds #-}
+{-# LANGUAGE TypeOperators #-}
+
+module Endpoints.VersionsEndpoint (VersionsAPI, handleVersions) where
+
+import Servant
+import Data.VersionsData
+
+type VersionsAPI = "_matrix" :> "client" :> "versions" :> Get '[JSON] Versions
+
+handleVersions :: Handler Versions
+handleVersions = return (makeVersions ["1.12"])