diff options
Diffstat (limited to 'Que')
| -rw-r--r-- | Que/Server.hs | 4 |
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" |