summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorquidtum <quidtum>2021-05-16 19:25:32 -0400
committerquidtum <quidtum>2021-05-16 19:25:32 -0400
commita3ba23ea55fa1532180bb1979f60ff174fa09298 (patch)
tree5e36ce366ebb7728ffe4835a755639e25f322635
parent00df43e21c408d4915ddce5b6dc78000648df9e5 (diff)
format, style a
-rw-r--r--src/Lib.hs4
-rw-r--r--static/style.css4
2 files changed, 4 insertions, 4 deletions
diff --git a/src/Lib.hs b/src/Lib.hs
index 9dd42ec..629ed4f 100644
--- a/src/Lib.hs
+++ b/src/Lib.hs
@@ -818,12 +818,12 @@ collectUntil n f src =
Just dst' -> (:) src <$> collectUntil (n-1) f dst'
headMay :: [a] -> Maybe a
-headMay [] = Nothing
+headMay [] = Nothing
headMay (x:_) = Just x
data HeadException = HeadException deriving (Show)
instance E.Exception HeadException
mustHead :: [a] -> IO a
-mustHead [] = throw HeadException
+mustHead [] = throw HeadException
mustHead (x:_) = return x
diff --git a/static/style.css b/static/style.css
index 6355b03..bec896b 100644
--- a/static/style.css
+++ b/static/style.css
@@ -17,11 +17,11 @@ body {
}
a {
- color: #1eaedb;
+ color: #1a97bf;
}
a:hover {
- color: #0e99c4;
+ color: #075d77;
}
button[type="submit"] {