summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Que/Server.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Que/Server.hs b/Que/Server.hs
index 5287c02..2b4e9f6 100644
--- a/Que/Server.hs
+++ b/Que/Server.hs
@@ -107,8 +107,8 @@ instance Envy.FromEnv Config
routes :: Scotty.ScottyT Text App ()
routes = do
Scotty.middleware logStdout
- let quepath = "^\\/([[:alnum:]_]+)\\/([[:alnum:]._/]*)$"
- let namespace = "^\\/([[:alnum:]_]+)\\/?$" -- matches '/ns' and '/ns/' but not '/ns/path'
+ let quepath = "^\\/([[:alnum:]_-]+)\\/([[:alnum:]._/-]*)$"
+ let namespace = "^\\/([[:alnum:]_-]+)\\/?$" -- matches '/ns' and '/ns/' but not '/ns/path'
-- GET /index.html
Scotty.get (Scotty.literal "/index.html") <| Scotty.redirect "/_/index"