haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Remove compiler warnings for unused var and unused imports.

Browse Source
This commit is contained in:
Mikkel Christiansen 2016-06-27 19:47:55 +02:00
parent 6595a707d0
commit cc134b93de
2 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
yesod-core/Yesod/Core/Handler.hs
View File

@ -568,7 +568,7 @@ getMessages = do
where where
enlist = pairup . S.split W8._nul enlist = pairup . S.split W8._nul
pairup [] = [] pairup [] = []
pairup [x] = [] pairup [_] = []
pairup (s:v:xs) = (decode s, preEscapedToHtml (decode v)) : pairup xs pairup (s:v:xs) = (decode s, preEscapedToHtml (decode v)) : pairup xs
decode = decodeUtf8With lenientDecode decode = decodeUtf8With lenientDecode

4
yesod-core/Yesod/Core/Internal/Session.hs
View File

@ -11,11 +11,9 @@ import qualified Web.ClientSession as CS
import Data.Serialize import Data.Serialize
import Data.Time import Data.Time
import Data.ByteString (ByteString) import Data.ByteString (ByteString)
import Control.Concurrent (forkIO, killThread, threadDelay) import Control.Monad (guard)
import Control.Monad (forever, guard)
import Yesod.Core.Types import Yesod.Core.Types
import Yesod.Core.Internal.Util import Yesod.Core.Internal.Util
import qualified Data.IORef as I
import Control.AutoUpdate import Control.AutoUpdate
encodeClientSession :: CS.Key encodeClientSession :: CS.Key