diff options
| author | metamuffin <metamuffin@disroot.org> | 2023-07-26 14:37:18 +0200 |
|---|---|---|
| committer | metamuffin <metamuffin@disroot.org> | 2023-07-26 14:37:18 +0200 |
| commit | 0ae2d031aa2bf13f9e0ba90b945e79cd614cfd7e (patch) | |
| tree | 83e23a0ee95df15a0669c40d84fc1ffdf3c47c5d | |
| parent | 3ea46d86bc9a859b9bd1f065b12e0a276796e42f (diff) | |
| download | fastbangs-0ae2d031aa2bf13f9e0ba90b945e79cd614cfd7e.tar fastbangs-0ae2d031aa2bf13f9e0ba90b945e79cd614cfd7e.tar.bz2 fastbangs-0ae2d031aa2bf13f9e0ba90b945e79cd614cfd7e.tar.zst | |
add route for stylesheet
| -rw-r--r-- | frontend/style.css | 2 | ||||
| -rw-r--r-- | src/Main.hs | 4 |
2 files changed, 6 insertions, 0 deletions
diff --git a/frontend/style.css b/frontend/style.css new file mode 100644 index 0000000..139597f --- /dev/null +++ b/frontend/style.css @@ -0,0 +1,2 @@ + + diff --git a/src/Main.hs b/src/Main.hs index ede3d14..3f372f6 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -21,6 +21,7 @@ data Search = Search { mkYesod "Search" [parseRoutes| / HomeR GET /bundle.js BundleR GET +/style.css StyleR GET /bangs.json BangsR GET /submitBang SubmitR POST /search.xml OpenSearchR GET @@ -35,6 +36,9 @@ getHomeR = sendFile typeHtml "index.html" getBundleR :: Handler () getBundleR = sendFile typeJavascript "bundle.js" +getStyleR :: Handler () +getStyleR = sendFile typeCss "style.css" + getBangsR :: Handler TypedContent getBangsR = do bangsAccessor <- lookupHeader "accept-encoding" >>= \case |