Skip to content

Commit

Permalink
Spotify fix
Browse files Browse the repository at this point in the history
  • Loading branch information
Dagefoerde committed Nov 20, 2018
1 parent 6a61734 commit 4aa3c66
Showing 1 changed file with 3 additions and 1 deletion.
4 changes: 3 additions & 1 deletion xmonad/xmonad.hs
Original file line number Diff line number Diff line change
Expand Up @@ -165,8 +165,10 @@ dbusOutput :: D.Client -> String -> IO ()
dbusOutput dbus str = do
spotify <- spotifyTitle
let
title | length spotify == 0 = ""
| otherwise = init spotify
signal = (D.signal (D.objectPath_ "/org/xmonad/Log") (D.interfaceName_ "org.xmonad.Log") (D.memberName_ "Update")) {
D.signalBody = [D.toVariant ("<b>" ++ (UTF8.decodeString str) ++ "</b> " ++ (init spotify))]
D.signalBody = [D.toVariant ("<b>" ++ (UTF8.decodeString str) ++ "</b> " ++ title)]
}
D.emit dbus signal

Expand Down

0 comments on commit 4aa3c66

Please sign in to comment.