diff -Nru haskell-libmpd-0.9.0.8/debian/changelog haskell-libmpd-0.9.0.9/debian/changelog --- haskell-libmpd-0.9.0.8/debian/changelog 2018-10-01 10:47:36.000000000 +0000 +++ haskell-libmpd-0.9.0.9/debian/changelog 2019-08-08 12:54:34.000000000 +0000 @@ -1,3 +1,15 @@ +haskell-libmpd (0.9.0.9-1build1) eoan; urgency=medium + + * Rebuild against new GHC abi. + + -- Gianfranco Costamagna Thu, 08 Aug 2019 14:54:34 +0200 + +haskell-libmpd (0.9.0.9-1) unstable; urgency=medium + + * New upstream release + + -- Clint Adams Sun, 28 Jul 2019 10:50:47 -0400 + haskell-libmpd (0.9.0.8-6) unstable; urgency=medium * Remove build dependency on libghc-mtl-dev (provided by ghc-8.4.3) diff -Nru haskell-libmpd-0.9.0.8/libmpd.cabal haskell-libmpd-0.9.0.9/libmpd.cabal --- haskell-libmpd-0.9.0.8/libmpd.cabal 2018-03-11 11:48:16.000000000 +0000 +++ haskell-libmpd-0.9.0.9/libmpd.cabal 2018-10-27 20:17:05.000000000 +0000 @@ -1,5 +1,5 @@ Name: libmpd -Version: 0.9.0.8 +Version: 0.9.0.9 Synopsis: An MPD client library. Description: A client library for MPD, the Music Player Daemon. Category: Network, Sound diff -Nru haskell-libmpd-0.9.0.8/src/Network/MPD/Commands/Types.hs haskell-libmpd-0.9.0.9/src/Network/MPD/Commands/Types.hs --- haskell-libmpd-0.9.0.8/src/Network/MPD/Commands/Types.hs 2018-03-11 11:48:16.000000000 +0000 +++ haskell-libmpd-0.9.0.9/src/Network/MPD/Commands/Types.hs 2018-10-27 20:17:05.000000000 +0000 @@ -41,6 +41,7 @@ import Data.Default.Class import qualified Data.Map as M +import Data.Map.Strict (insertWith) import Data.Time.Clock (UTCTime) import Data.String @@ -251,7 +252,7 @@ -- | Add metadata tag value. sgAddTag :: Metadata -> Value -> Song -> Song -sgAddTag meta value s = s { sgTags = M.insertWith' (++) meta [value] (sgTags s) } +sgAddTag meta value s = s { sgTags = insertWith (++) meta [value] (sgTags s) } defaultSong :: Path -> Song defaultSong path = diff -Nru haskell-libmpd-0.9.0.8/src/Network/MPD/Core.hs haskell-libmpd-0.9.0.9/src/Network/MPD/Core.hs --- haskell-libmpd-0.9.0.8/src/Network/MPD/Core.hs 2018-03-11 11:48:16.000000000 +0000 +++ haskell-libmpd-0.9.0.9/src/Network/MPD/Core.hs 2018-10-27 20:17:05.000000000 +0000 @@ -116,7 +116,8 @@ (Just <$> connectTo host (PortNumber $ fromInteger port)) `E.catch` (\(_ :: E.SomeException) -> return Nothing) checkConn = do - [msg] <- send "" + singleMsg <- send "" + let [msg] = singleMsg if "OK MPD" `isPrefixOf` msg then MPD $ checkVersion $ parseVersion msg else return False