I fixed the yesod shit

src/Foundation.hs

@@ -56,9 +56,7 @@ instance Yesod AgentCtx where
 -- Store session data on the client in encrypted cookies,
 -- default session idle timeout is 120 minutes
     makeSessionBackend :: AgentCtx -> IO (Maybe SessionBackend)
-    makeSessionBackend _ = Just <$> defaultClientSessionBackend
-        120    -- timeout in minutes
-        "config/client_session_key.aes"
+    makeSessionBackend _ = pure Nothing
 
 -- Yesod Middleware allows you to run code before and after each handler function.
 -- The defaultYesodMiddleware adds the response header "Vary: Accept, Accept-Language" and performs authorization checks.

src/Lib/Types/Semver.hs

@@ -21,10 +21,6 @@ import           Yesod.Core
 newtype AppVersion = AppVersion
     { unAppVersion :: (Word16, Word16, Word16, Word16) } deriving (Eq, Ord)
 
-instance Hashable AppVersion where
-    hash (AppVersion (a, b, c, d)) = (2 ^ a) * (3 ^ b) * (5 ^ c) * (7 ^ d)
-    hashWithSalt _ = hash
-
 instance Read AppVersion where
     readsPrec _ s = case traverse (readMaybe . toS) $ splitOn "+" <=< splitOn "." $ (toS s) of
         Just [major, minor, patch, build] -> [(AppVersion (major, minor, patch, build), "")]