From ebdbbd4829b155a0ff739596cb12f1d1356c9591 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Thu, 2 Jun 2011 03:48:44 -0700
Subject: Compatibility with libmpd 0.6 (fixes #50)
---
src/Plugins/Monitors/MPD.hs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
(limited to 'src/Plugins/Monitors')
diff --git a/src/Plugins/Monitors/MPD.hs b/src/Plugins/Monitors/MPD.hs
index 06d0fa7..60c3e48 100644
--- a/src/Plugins/Monitors/MPD.hs
+++ b/src/Plugins/Monitors/MPD.hs
@@ -91,7 +91,7 @@ parseSong (Right Nothing) = return $ repeat ""
parseSong (Right (Just s)) =
let join [] = ""
join (x:xs) = foldl (\a o -> a ++ ", " ++ o) x xs
- str sel = maybe "" join (M.sgGet sel s)
+ str sel = maybe "" join (M.sgGetTag sel s)
sels = [ M.Name, M.Artist, M.Composer, M.Performer
, M.Album, M.Title, M.Track, M.Genre ]
fields = M.sgFilePath s : map str sels
--
cgit v1.2.3