diff options
| author | Joris | 2020-10-31 15:24:26 +0100 |
|---|---|---|
| committer | Joris | 2020-10-31 15:24:26 +0100 |
| commit | 1e167679f6827c7119d616633b21fffef269cd75 (patch) | |
| tree | 9c846c03913366936a093976a329e7a774002283 /css/Media.hs | |
| parent | c9c0a6e8651da823b41e4186a736f2dbb48919db (diff) | |
Use only HTML and CSS
Diffstat (limited to 'css/Media.hs')
| -rw-r--r-- | css/Media.hs | 36 |
1 files changed, 0 insertions, 36 deletions
diff --git a/css/Media.hs b/css/Media.hs deleted file mode 100644 index f9b56e1..0000000 --- a/css/Media.hs +++ /dev/null @@ -1,36 +0,0 @@ -module Media - ( mobile - , mobileTablet - , tablet - , tabletDesktop - , desktop - ) where - -import Clay hiding (query) -import qualified Clay -import qualified Clay.Media as Media -import Clay.Stylesheet (Feature) - -mobile :: Css -> Css -mobile = query [Media.maxWidth mobileTabletLimit] - -mobileTablet :: Css -> Css -mobileTablet = query [Media.maxWidth tabletDesktopLimit] - -tablet :: Css -> Css -tablet = query [Media.minWidth mobileTabletLimit, Media.maxWidth tabletDesktopLimit] - -tabletDesktop :: Css -> Css -tabletDesktop = query [Media.minWidth mobileTabletLimit] - -desktop :: Css -> Css -desktop = query [Media.minWidth tabletDesktopLimit] - -query :: [Feature] -> Css -> Css -query = Clay.query Media.screen - -mobileTabletLimit :: Size LengthUnit -mobileTabletLimit = (px 520) - -tabletDesktopLimit :: Size LengthUnit -tabletDesktopLimit = (px 950) |